Help for this page

Select Code to Download


  1. or download this
    # tmd.t

...
ok(!$dbh->fetchrow_hashref(), q{Expect no more than 3 rows});

__END__
  2. or download this
    $ perl tmd.t
1..4
...
tmd....ok
All tests successful.
Files=1, Tests=4,  0 wallclock secs ( 0.07 cusr +  0.01 csys =  0.08 C
+PU)