Help for this page

Select Code to Download


  1. or download this
    I:\svn\dbd-odbc\trunk>perl -le "use DBI; my $h = eval {DBI->connect('d
+bi:ODBC:in
validsn', 'fred', 'fred', {RaiseError => 0, PrintError => 0})}; print 
+'error' .
$@ if $@;print $h->ping;"
Can't call method "ping" on an undefined value at -e line 1.
  2. or download this
    I:\svn\dbd-odbc\trunk>perl -le "use DBI; my $h = eval {DBI->connect('d
+bi:ODBC:in
validsn', 'fred', 'fred', {PrintError => 0})}; print 'error' . $@ if $
+@;print $h
->ping;"
Can't call method "ping" on an undefined value at -e line 1.