Select Code to Download

#   Failed test at t/P.t line 96.
self-test failed: Can't locate object method "print" via package "IO::
+File" at lib/P.pm line 119.
...
Use of uninitialized value $rcase in numeric eq (==) at t/P.t line 95.

...a bunch more...

  ok($caseno == $rcase, "received testcase $caseno");
  if (length($re)) {ok($rstr =~ m{$re}, $name)}