Connection pooling using perl DBI with postgresql

i am using a perl script which inserts records into the database at every 5 minutes. Now when there is a lot of data available it might possible that number of connections made to the database increase thereby wasting my precious resources. So i want connection pooling mechanism to work with perl. I am using postgresql as my database. I googled it and i found some solutions like i found such solutions but they didnot work for me

Can anyone please tell me how can i achieve connection pooling in perl?

Thanks in advance.

Solution

I'm not sure I'd restrict myself to a perl solution. Just install pgbouncer and have it available to any clients you require.

Can the Perl compiler tell me if I have an unchecked exception in my code?
Using IPC::Run inside Mojo::IOLoop::Subprocess
What is the perl equivalent of MAX_INT?
Two occurrences of a variable declared with 'my' but in two different packages in the same file
How to send asynchronous json using Perl to an PHP url?
Perl How to use DBIx::Class to return data beautifully
Perl: inline variable substitution not working
Sorting an array of hashes by multiple keys in Perl
Perl - How do I sort an array of arrays based on the value of a column while maintaining the order specified in a hash?
How do I sort a hash of hashes by value using Perl?
The simple way to sort based on values in a hash in Perl
Perl adding parameters into a loop
Perl search and replace words in file
Printing utf-8 text in Perl debugger using x command
Date Time Format, Perl Oracle SQL
Why is my hand-created JSON not recognizing the object in an array?
RSA using EME-OAEP padding with SHA-256 as hash function
Why does running the same regex twice yield different results?
Preserve YAML order perl
How to check if $j->{component} is empty in perl?
Destructive @_ operation and passing @_ in the same statement
How can I run a Perl script from Emacs?
Perl - positions of regex match in string
How do i figure out which dependences of a CPAN distribution require a compiler?
How can I convert a string to a number in Perl?
Add a backslash to specific lines per negative lookaround with sed or perl
How can you prevent forked child processes from disconnecting DBD::Pg connections, when you have no access to $dbh?
How to pass a string with spaces as http POST data using curl
perl debugger and utf8 variable names
How can I extract the text in an XML tag in Perl?