Select Code to Download

#!/usr/bin/perl -w

...
# Now split apart on the quotes and commas.
my @args = split(/", "/,$cmdline);
print "Args are: **",join("**, **",@args),"**\n";