my @args = ('perl',
    '/home/myname/public_html/somedir/cgi-bin/prn_to_file.pl',$param1,
    ,'>','/home/myname/public_html/somedir/results/output.txt');

    system(@args) == 0 or die "Code does not work $!";



##</code><code>##

THIS IS YOUR INPUT TEXT: foo bar