
reefland
Deleted
Feb 23, 2000, 1:19 AM
Post #3 of 5
(380 views)
|
ok here it is #!perl/bin/perl chmod 755 geturl.pl # Get HTML header, ender, define the page title. # Get the query string. $QueryString = $ENV{'QUERY_STRING'}; @NameValuePairs = split (/&/, $QueryString); # Put up an HTML Header, page title and a rule. print "BODY>\n"; print "<H1>&Title</H1>\n"; print "<HR>\n"; # Split each of the name-value pairs and print them on the page. foreach $NameValue (@NameValuePairs) { ($Name, $Value) = split (/=/, $NameValue); print "Name = $Name, value = $Value<BR>\n"; } # End geturl.pl Now does the first command have to be like that, it can't resemble my first line?
|