1.5w+
社区成员
3.3w+
社区内容
- 主页
高分问一个很简单的问题?(急)
4.请写一小段Perl代码遍历%test散列中所有的关键字以及所对应的值，并打印出来（这个散列已经初始化过）
...全文
xyzxyz1111 2004年12月25日
#!/usr/bin/perl
use warnings;
use strict;
use CGI;
my $g = new CGI("NAME=lofuture&PASSWORD=why&SEX=%C4%D0&LOVING=FOOTBALL&SEND=%CC%E1%BD%BB");
my %test = $g->Vars();
foreach (keys %test){
printf "%s=%s\n", $_, $test{$_};
}
use warnings;
use strict;
use CGI;
my $g = new CGI("NAME=lofuture&PASSWORD=why&SEX=%C4%D0&LOVING=FOOTBALL&SEND=%CC%E1%BD%BB");
my %test = $g->Vars();
foreach (keys %test){
printf "%s=%s\n", $_, $test{$_};
}
gpboy2001 2004年12月25日
楼上大哥帮下忙哟,
gpboy2001 2004年12月25日
帮忙可不可以再帮我看一下这一道呀?
１.我用GET方法向cgitest.pl提交了下面这个字符串：
NAME=lofuture&PASSWORD=why&SEX=%C4%D0&LOVING=FOOTBALL&SEND=%CC%E1%BD%BB
如何在cgitest.pl中得到如下的名称和值的对应形式（保存在一个散列中）：
NAME=lofuture
PASSWORD=why
SEX=男
LOVING=足球
SEND=提交
１.我用GET方法向cgitest.pl提交了下面这个字符串：
NAME=lofuture&PASSWORD=why&SEX=%C4%D0&LOVING=FOOTBALL&SEND=%CC%E1%BD%BB
如何在cgitest.pl中得到如下的名称和值的对应形式（保存在一个散列中）：
NAME=lofuture
PASSWORD=why
SEX=男
LOVING=足球
SEND=提交
xyzxyz1111 2004年12月25日
foreach (keys %test){
print;
print ":";
print $test{$_};
print "\n";
}
print;
print ":";
print $test{$_};
print "\n";
}
gpboy2001 2004年12月25日
55555555