Select Code to Download

package t::MyTest;
use Test::Base -Base;
...
    print @_;
    defined $_[0];
}

use t::MyTest;

...
--- input
0
--- expected: 0

t\01-test.t .. Use of uninitialized value $_[1] in print at t/MyTest.p
+m line 14,
 <DATA> line 1.
...
  Parse errors: Bad plan.  You planned 1 tests but ran 0.
Files=1, Tests=0,  1 wallclock secs ( 0.06 usr +  0.23 sys =  0.30 CPU
+)
Result: FAIL