Select Code to Download

# Funky.pm
use strict;
...
};

1;

#!env perl
use strict;
...
    is($t->UR->Y, 25, "UR y val");
    done_testing();
};

$ perl t_File.pl
ok 1 - use Funky;
...
        Test::More::subtest('Rectangle', 'CODE(0x6007d0e58)') called a
+t t_File.pl line 30
# Tests were run but no plan was declared and done_testing() was not s
+een.
# Looks like your test exited with 255 just after 4.