Select Code to Download

install_driver(Pg) failed: Can't load '/usr/lib/perl5/vendor_perl/5.8.
+0/i386-linux-thread-multi/auto/DBD/Pg/Pg.so' for module DBD::Pg: libp
+q.so.2: cannot open shared object file: No such file or directory at 
+/usr/lib/perl5/5.8.0/i386-linux-thread-multi/DynaLoader.pm line 229.
 at (eval 7)[/usr/lib/perl5/vendor_perl/5.8.0/i386-linux-thread-multi/
+DBI.pm:597] line 3
...
 at dbusers line 6
        DBI::install_driver('DBI','Pg') called at /usr/lib/perl5/vendo
+r_perl/5.8.0/i386-linux-thread-multi/DBI.pm line 497
        DBI::connect('DBI','DBI:Pg:dbname=shop1','','') called at dbus
+ers line 6

#!/usr/bin/perl -w
use strict;
...
$dbh->do("CREATE TABLE users (uid INT, login CHAR(8))");

$dbh->disconnect;