Package: libdbi-perl
Version: 1.631-3+b1
When I invoke test.pl with arguments -W from an ordinary shell prompt,
it prints the following:
Subroutine UNIVERSAL::VERSION redefined at
/usr/share/perl/5.20/version.pm line 59.
Expected Result: No message should appear except for errors related to
database connections.
#!/usr/bin/perl
use DBI qw(:sql_types);
$dbconn_conninfo = 'dbi:Pg:dbname=xxxxxx;host=dbserver';
$dbconn_username = 'xxxxxxxxx';
my $handle = DBI->connect($dbconn_conninfo, $dbconn_username, undef, {
AutoCommit => 0 });
