Select Code to Download

#! perl -wl
use strict;
...
    print "#";
    print "-";
}

Can't call method "cxontinue" without a package or object reference at
+ test.pl line 5.
1
...
10
#
-

foreach my $i (1 .. 10) {
...
print '-' }->cxontinue;

test.pl syntax OK