Select Code to Download

$ perl -e '
my @colors = qw(red green blue yellow pink purple brown);
...
}
print "@colors \n";
'

$ perl -e '
my @colors = qw(red green blue yellow pink purple brown);
...
}
print "@colors \n";
'

__output__
red green blue yellow purple