http://www.perlmonks.org?node_id=113850


in reply to Friday Code Quiz

Okay, a shot at it: it won`t be 1,2, as it`s not quoted;
It won`t be the last element of the a list as it`s not bracketed (sp.?) as a list;

Idea: Perl tries to parse 1,2 into a scalar, fails at the comma,
does the best to do the thing that seems logical and parses it as
$i=1,(as an int) truncating the ,2 to the semi-colon...
and skipping to the next instruction

But then again.. I should read a lot on the Perl parser...

GreetZ!,

print "profeth still\n" if /bird|devil/;