Select Code to Download

#!/usr/bin/perl

...
done_testing();

__END__

$ perl test.pl
ok 1 - 9 .. 10 - 1 without constant (OP)
...
ok 11 - 9 .. 10 with constant (proposed-11143893)
1..11
# Looks like you failed 2 tests of 11.