03 2017 档案

split
摘要:下面我们来看看如何使用split命令。假如我们需要按行切,可以用下面命令实现: 这样会产生很多个小文件,并且每个小文件里面的内容最多为100行 如果我们需要按照大小切,可以用下面命令实现: 这样会产生很多大小为1MB的文件,如果我们不想一行数据被切割,那么可以使用下面命令实现: 结果也是会产生很多的 阅读全文

posted @ 2017-03-24 15:22 Perl6 阅读(255) 评论(0) 推荐(0) 编辑

perl HTML::HeadParser获取html头部信息
摘要:1 use LWP::Simple; 2 use HTML::HeadParser; 3 use utf8; 4 binmode(STDOUT, ":encoding(gbk)"); #设置win下输出中文 5 6 $result = get('http://www.baidu.com'); 7 $what = HTML::HeadParser->new; 8 $what->p... 阅读全文

posted @ 2017-03-12 03:10 Perl6 阅读(315) 评论(0) 推荐(0) 编辑

perl HTML::LinkExtor模块(2)
摘要:当然, 你还可以加一下正则, 去掉不是http://开头的也行 阅读全文

posted @ 2017-03-12 02:51 Perl6 阅读(634) 评论(0) 推荐(0) 编辑

perl HTML::LinkExtor模块(1)
摘要:这个代码打印页面中的所有标签名与对应的link链接地址 如果我们要打印其中的所有img地址呢,那我们可能用$tag来判断是哪种标签, 从而再进一步提取数据 具体可以看这里: perl HTML::LinkExtor模块(2) 阅读全文

posted @ 2017-03-12 02:42 Perl6 阅读(219) 评论(0) 推荐(0) 编辑

perl模拟登录(1)
摘要:1 use WWW::Mechanize; 2 3 my $ua = WWW::Mechanize->new(); 4 $ua->post('http://localhost/dvwa/DVWA-master/login.php'); 5 #登录网址 6 $ua->form_number(1); 7 #表单编号, 也可用$ua->form_name(form_name); 8 ... 阅读全文

posted @ 2017-03-08 03:50 Perl6 阅读(330) 评论(0) 推荐(0) 编辑

st2-045漏洞利用poc
摘要:1 use LWP::UserAgent; 2 3 undef $/; 4 if(@ARGV != 1){print "Use:poc.pl http://target/index.action\n";exit;} 5 my $url = shift; 6 my $ua = LWP::UserAgent->new; 7 my $req = HTTP::Request->new(P... 阅读全文

posted @ 2017-03-08 01:40 Perl6 阅读(2383) 评论(0) 推荐(0) 编辑

python3中处理url异常
摘要:1 import urllib.request 2 import urllib.error 3 4 url = 'http://c.telunyun.com/Chart/getJsonData?market=1' 5 data = urllib.request.Request(url) 6 try: 7 data = urllib.request.urlopen(data... 阅读全文

posted @ 2017-03-08 00:33 Perl6 阅读(1225) 评论(0) 推荐(0) 编辑

导航

< 2025年3月 >
23 24 25 26 27 28 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31 1 2 3 4 5
点击右上角即可分享
微信分享提示