Select Code to Download

$ perl -e 'use strict;
sub input{
...
input(join " ", @ARGV);
' Fear Anger Hate Darkside
4 parameters supplied