poletti@PolettiX:~/sviluppo/perl$ perl pathological.pl
Missing $ on loop variable at pathological.pl line 1.
poletti@PolettiX:~/sviluppo/perl$ 
poletti@PolettiX:~/sviluppo/perl$ 
poletti@PolettiX:~/sviluppo/perl$ cat pathological.pl
for qw(Whom the bell tolls) {}            # huh? for qw() ?
continue { print "$_\n"; next }