Select Code to Download

$ perl -E '
    for ("a" .. "b") {
...
$_[a] $i[2]
$_[b] $i[1]
$_[b] $i[2]

$ perl -E '
    for my $f ("a" .. "b") {
...
$_[] $f[a] $i[2]
$_[] $f[b] $i[1]
$_[] $f[b] $i[2]

$ perl -E '
    for my $f ("a" .. "b") {
...
$_[] $f[a] $i[2]
$_[.bu] $f[b] $i[1]
$_[.bu] $f[b] $i[2]

$ perl -E '
    for my $f ("a" .. "b") {
...
        }
    }
'

$ perl -E '
    use warnings;
...
'
Argument "a" isn't numeric in foreach loop entry at -e line 7.
Argument "b" isn't numeric in foreach loop entry at -e line 7.

$ perl -E '
    use warnings;
...
        @rgb = qw{#ff0000 #00ff00 #0000ff};
    }
'