#!/usr/local/bin/perl use CGI qw(:standard); @jid = param('JobID'); print "Content-type: text/html\n\n"; print "TEST SCRIPT"; print "

"; foreach $jid (@jid) { print "+$jid"; } $ENV{'QUERY_STRING'} eq (print "+$jid"); #$ENV{'QUERY_STRING'} = print "+$jid"; #### print "

http://www.foo.com/cgi-bin/test2.pl?$ENV{'QUERY_STRING'}

"; print "

http://www.foo.com/cgi-bin/test2.pl?$ENV{'QUERY_STRING'}"; print "

";