Select Code to Download

use v5.12;
use warnings;
...
} continue {
    print "\n";
}

C:/Strawberry/perl/bin\perl.exe -w d:/tmp/pm/do_once.pl 
========= IMPLEMENTATION
...
5 has no match

Compilation finished at Sat Jul  3 18:15:36