Perl - PostgreSQL connection
Sample code for connecting to a PostgreSQL database using Perl and simple queries.
The USERNAME, PASSWORD and DATABASE_NAME variables must be substituted with those supplied for your web hosting account.
# # Example Perl database. # # Please run: # # man DBI # # To get learn more about Perl database access. use DBI; my $db_host = 'localhost'; my $db_user = 'USERNAME'; my $db_pass = 'PASSWORD'; my $db_name = 'DATABASE_NAME'; # Connect to a PostgreSQL database. my $db = "dbi:pg:dbname=${db_name};host=${db_host}"; # Connect to database. $dbh = DBI->connect($db, $db_user, $db_pass, { RaiseError => 1, AutoCommit => 0 } ) || die "Error connecting to the database: $DBI::errstr\n"; # Our query. my $query = "SELECT something FROM sometable"; # Run query. $ref = $dbh->selectcol_arrayref($query); # Print results. print join("\n", @$ref); # end