Copyright © 2001 Qusay H. Mahmoud
15
GET….
l
Parsing:
l
l
@values = split(/&/,$ENV{'QUERY_STRING'});
l
foreach $i (@values) {
l
($varname, $mydata) = split(/=/,$i);
l
print "$varname = $mydata\n";
l
}
l