Select Code to Download

my $programtorun  =  'spawnee';
my $parameters    =  'a b c flapjack sweets monkeybusiness';
my @cmdline       =  ( $programtorun, $parameters );
system ( @cmdline );

if ( @ARGV )
    {
...
        print "Parameter is $_\n";
        }
    }