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

##</code><code>##

if ( @ARGV )
    {
    foreach ( split(' ', $ARGV[0] ) )
        {
        print "Parameter is $_\n";
        }
    }