2017年6月2日

perl6 拖库脚本

摘要： #注入点: #https://fei.sg/shop/products.php?action=content&id=-23 #check mysql column_name of the sqlinject use HTTP::UserAgent; use URI::Encode; my $all_table = "db_zf,dg_activity,dg_activity_log,... 阅读全文

posted @ 2017-06-02 22:53 Perl6 阅读(328) 评论(0) 推荐(0) 编辑

python2 处理urllib/urllib2错误并打印源码

摘要： import urllib2 import urllib url = 'http://localhost/12.php' data = {} data['cmd']='whoami' data = urllib.urlencode(data) try: content = urllib2.urlop 阅读全文

posted @ 2017-06-02 09:13 Perl6 阅读(149) 评论(0) 推荐(0) 编辑

perl6 修改文件并覆盖

摘要： use v6; my $filename = 'data.txt'; my $data = slurp $filename; say $data; $data ~~ s/'4'/'ABC'/; say $data; spurt $filename, $data; say 'Done!'; 用slur 阅读全文

posted @ 2017-06-02 06:25 Perl6 阅读(463) 评论(0) 推荐(0) 编辑

perl6文件操作

摘要： use v6; #perl6中读取文件方法 #:r 只读， :w 只写, ：rw 读写, :a 追加 my $fp = open 'filename.txt', :rw; for $fp.^methods -> $method { say $method; } #向文件写入， 可以用say或print或print或spurt $fp.say('hello, world'); $fp.pr... 阅读全文

posted @ 2017-06-02 06:18 Perl6 阅读(201) 评论(0) 推荐(0) 编辑

导航