Select Code to Download

#!/usr/bin/perl
use strict;
use warnings;
my @args = ("animal=duck", "vegetable=carrot");
system("/usr/bin/perl", "/tmp/b.cgi", @args);

#!/usr/bin/perl
use warnings;
...
print "b.cgi argv dump:\n";
print join(',', @ARGV);
print "\n";

Content-type: text/plain

...
</ul>
b.cgi argv dump:
animal=duck,vegetable=carrot

b.cgi query dump:
<ul></ul>
b.cgi argv dump:
animal=duck,vegetable=carrot