20CN网络安全小组论坛 - 编程破解

论坛: 编程破解标题: 老大，快来

复制本贴地址

作者: TomyChen [tomychen]

论坛用户

http://www.tomydan.net/cgi-bin/test
像这样的

代码:


        printf ("<form name=\"gs\" method=\"GET\" action=\"http://www.tomydan.net/cgi-bin/test\">");
        printf ("<input type=\"hidden\" name=\"hl\" value=\"zh-CN\">");
        printf ("<input type=\"text\" name=\"q\" size=\"31\" maxlength=\"2048\" value="">");
        printf ("<input type=\"hidden\" name=\"lr\" value=\"lang_zh-CN\" >");
        printf ("<input type=\"submit\" name=\"btnG\" value=\"GOGOGO~~\">");
        printf ("</form>");

中的q的值怎么得到？

地主发表时间: 05/29 17:40

回复: NetDemon [netdemon]

ADMIN

偷懒方法：

use CGI qw(:cgi);
my $q = param('q');

常规方法：

read(STDIN, $buffer, $ENV{'CONTENT_LENGTH'});
@pairs = split(/&/, $buffer);
foreach $pair (@pairs) {
($name, $value) = split(/=/, $pair);
$value =~ tr/+/ /;
$value =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;
if ($INPUT{$name}) { $INPUT{$name} = $INPUT{$name}.",".$value; }
else { $INPUT{$name} = $value; }
}

my $q = $INPUT{'q'};

B1层发表时间: 05/29 17:50

回复: group [group]

论坛用户

复杂

B2层发表时间: 05/30 09:32

论坛: 编程破解