in reply to dbh connections: stumped!

Maybe its better to replace the die for something else. I would suggest
#!/usr/bin/perl

use strict;
use DBI;
use CGI qw(:standard);
use CGI::Carp "fatalsToBrowser";

my $dbh = DBI->connect("dbi:mysql:database=dbname;host=localhost",
             "uname", 
             "pword") ;

print header ;
print "<HTML>" ;
if ( ! $dbh ) {
      print "$DBI::errstr: not ";
} 
print "connected" ;
print "</HTML>" ;

$dbh->disconnect() if $dbh ;

[download]


Luca

In Section Seekers of Perl Wisdom