Minor severity issue:
I noted 2 places where keywords 'given' and 'when' needed to be added
and one place where 'default' needed to be added (re: source version
20101217).
line #5859: (after comment
'We can remove semicolons after blocks preceded by these keywords'):
Keywords 'given', 'when' and 'default' all should be added here.
-- semicolons are optional after the blocks of all these keywords.
line #28310 array @keyword_taking_list: (see note!)
Keywords 'given' and 'when' are needed here (but not 'default').
-- (note) While this would seem to be an odd case, I note that the
following does work as expected:
Show quoted text
> perl -wE '
my $i=2;
given ([$i,2,3]) { when ([1,2,3]) { print "1\n"} when ([2,2,3]) {print
"2\n"}}'
--- Setting $i=1, prints out '1' instead of '2'.