CGI How-to, ReadC_pl Test Form
Press here to try the test command line string.
File: index.pl
#!/usr/local/bin/perl
sub readCommandLineData
{
local(*queryString) = @_ if @_;
$queryString = join(" ",@ARGV);
return 1;
}
print "Content-type: text/plain\n\n";
&readCommandLineData(*data);
print "The command line data is:\n\n";
print $data;
print "\n";