Select Code to Download

my $hostname   = 'db71b.pair.com';
my $dbase      = '111';
...
) || die "DB connection failed: $DBI::errstr\n";

# DB connection is successful if we are here ...