Select Code to Download

#!/usr/bin/perl

...
test "Pos at end"    , 'World 123456*'           =>   ""       ;

done_testing;

Version: 5.040000
ok 1 - In the middle
...
ok 10 - Nr at end
ok 11 - Pos at end
1..11