Help for this page
use Data::Dumper; $Data::Dumper::Indent = 0; # no spaces tabs or other fluff ... eval {$saved} return $VAR1 ? $VAR1 : {}; }
sub selectrow_array { my $dbh = shift; my $query = shift; ... return my_custom_error_handler("selectrow_array $query") if $@; return @result; }
www.com | www.net | www.org
No recent polls found