`perl some_script.cgi blah=foo larh=bar`;

##</code><code>##

#!/usr/bin/perl

use strict;
use warnings;

use CGI qw(:all);
print header;

my $blah = `perl ./tmp.cgi 'var1=one&var2=two'`;
print "<pre>", $blah, "</pre>\n";

exit;

##</code><code>##

#!/usr/bin/perl

use strict;
use warnings;

use CGI qw(:all);
my $q = new CGI;

my $var1 = $q->param("var1");
my $var2 = $q->param("var2");

print $var1, "\n";
print $var2, "\n";

exit;