Select Code to Download

%defaults = map {(/(.*?)=(.*)/)} @ARGV;

$line = 'foo=moo sho=clue\ woo\=moo';
@pairs = split(/(?<!\\)\s/, $line);