Hi All In my code i am trying to connect to a db if it fails it should return 0 , this a web based script and it throws me internal server error and the apache logs gives me Premature end of script headers: syncscript.pl , But if i am able to connect to the remote host then my code works fine
print "Content-type: text/html\n\n"; : : : sub some_sub { eval{ alarm(5); $DBH_local = DBI->connect("DBI:mysql::192.168.1.26", "all_user", "all_passwd") ; alarm(0); } ; if ($@){ return 0; } } i even tried the following : sub some_sub { $DBH_local = DBI->connect("DBI:mysql::192.168.1.26", "all_user", "all_passwd") || return 0 ; } ; } but this too doesn't work . gives me the same error "Internal server error " Please help me with this thanks -- Regards Agnello D'souza -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/