Help for this page
>perl -wMstrict -le "for my $expression (0, 1) { ... " if $expression is 0, $var is 'bar' if $expression is 1, $var is 'bar'