代码搜索：cgi
找到约 10,000 项符合「cgi」的源代码
代码结果 10,000
www.eeworm.com/read/110210/15539747
cgi compare.cgi
#!/perl/bin/perl
require "./setup.pl";
use CGI;
$co=new CGI;
@temp=$co->param('proname');
print "Content-type: text/html\n\n";
if ($#temp
www.eeworm.com/read/110210/15539794
cgi search.cgi
#!/perl/bin/perl
require "./setup.pl";
use CGI;
$co=new CGI;
$name1=$co->param('name1');
$name2=$co->param('name2');
$price1=$co->param('price1');
$price2=$co->param('price2');
$page=$co->para
www.eeworm.com/read/110210/15539807
cgi data.cgi
#!/perl/bin/perl
require "./setup.pl";
use CGI;
my $co=CGI->new();
my $id=$co->cookie('id');
my $key=$co->cookie('key');
print "Content-type: text/html\n\n";
unless (($id eq $supername)&&($key
www.eeworm.com/read/110210/15539855
cgi see.cgi
#!/perl/bin/perl
require "./setup.pl";
use CGI;
$co=new CGI;
$name2=$co->param('name2');
$filename=$co->param('mydir');
print "Content-type: text/html\n\n";
&check($name2,$filename);
open (f,"
www.eeworm.com/read/110210/15539856
cgi price.cgi
#!/perl/bin/perl
require "./setup.pl";
use CGI;
$co=new CGI;
$name2=$co->param('name2');
$filename=$co->param('mydir');
print "Content-type: text/html\n\n";
&check($name2,$filename);
open (f,"
www.eeworm.com/read/110210/15539857
cgi delete.cgi
#!/perl/bin/perl
print qq~
success
演示版不包含此功能，请购买正式版email:wb410@163.netQQ:3323684
www.eeworm.com/read/110210/15539902
cgi login.cgi
#!/perl/bin/perl
require "./setup.pl";
use CGI;
$cgi=new CGI;
$id=$cgi->param('id');
$key=$cgi->param('key');
unless (($id eq $supername)&&($key eq $superkey))
{print "Content-type: text/html\n
www.eeworm.com/read/110039/15543073
rules cgi.rules
var EXTERNAL_NET any
var HOME_NET any
var HTTP_SERVERS any
alert tcp $EXTERNAL_NET any -> $HTTP_SERVERS 80 (msg:"WEB-CGI wrap access"; flags: A+; content: "/cgi-bin/wrap?"; content: "../";reference:a
www.eeworm.com/read/109993/15543803
cgi pass.cgi
www.eeworm.com/read/109993/15543804