‹‹ 上一主题 | 下一主题 ››
发新话题
打印

[转载]扫描网页恶意代码的程序

冰血封情

老林

团队决策人

Rank: 9Rank: 9Rank: 9

E.S.T运营责任人

帖子
6819 
精华
834 
积分
36070 
阅读权限
255 
性别
男 
来自
中国 
在线时间
586 小时 
注册时间
2004-6-25 
最后登录
2008-9-6 

优秀管理奖 资料收集奖 原创技术奖 核心建议奖

楼主 大 中 小 发表于 2004-7-11 03:36  只看该作者

[转载]扫描网页恶意代码的程序

文章作者：demonalex@hackermail.com

(此程序需要字典)
复制内容到剪贴板
代码:
#!usr/bin/perl -w
#c:\find.pl
use LWP::Simple;
$url=$ARGV[0];
$dir=$ARGV[1];
$result=get $url;
open(CON,"<$dir");
do{
$bug=<CON>;
chop($bug);
if($result=~m/$bug/){
print"...havd $bug!\n";
}else{
print"...haven&#39;t $bug!\n";
}
}until(eof(CON));
close CON;
exit 1;
#此‘物’可以帮助你查找代码(加恶意代码字典可以查找恶意代码)
#格式:perl c:\find.pl url 字典文件
#需要LWP::Simple库
#url:http://search.cpan.org/src/GAAS/ ... 5/lib/LWP/Simple.pm
#有问题请email:demonalex@hackermail.com

TOP

‹‹ 上一主题 | 下一主题 ››
发新话题