在index.cgi中怎样得到中的fv=7。（得到解法再加100分）

[flyonet]

跪求

[AllCHN]

方法1:
use CGI;
my $query=new CGI;
$query->import_names('q');

$q::fv 就是你需要的值

[AllCHN]

方法2: (通过 URL 传输参数)
$buffer = $ENV{'QUERY_STRING'};
@pairs = split(/[&;]/, $buffer);
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$name =~ tr/+/ /;
$name =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
$in{$name} = $value if ($name ne '');
}

$in{fv} 就是你需要的值。