05 2017 档案

perl6 HTTP::UserAgent发送post
摘要：use HTTP::UserAgent; my $ua = HTTP::UserAgent.new; say 'All method:'; say $ua.^methods; my %data = :cmd('whoami'); my $result = $ua.post('http://localhost/1.php', %data); say $result.content; 阅读全文

posted @ 2017-05-27 03:04 Perl6 阅读(248) 评论(0) 推荐(0) 编辑

perl6中的hash定义(2)
摘要：1 use v6; 2 my %ha= a=>1, :b, :!c; 3 say %ha; 4 say %ha; 5 #这里不能用%ha{a}, {a}表示调用a()函数了， 在perl6中， {}有特别函义 6 say %ha{'a'}; 阅读全文

posted @ 2017-05-27 02:52 Perl6 阅读(127) 评论(0) 推荐(0) 编辑

perl6中函数参数(2)
摘要：1 use v6; 2 #如果参数是可选的， 可以在后面加个?后定义 3 sub Choo($x, $y?){ 4 say $x+$y; 5 } 6 Choo(1); 7 Choo(1,2); 8 #具名参数， 也就是字典形式的调用 9 sub Dit(:name($n), :age($a)){ 10 say $n,' is ', $a; 11 } 12 Dit(nam... 阅读全文

posted @ 2017-05-27 02:48 Perl6 阅读(397) 评论(0) 推荐(0) 编辑

perl6中函数参数(1)
摘要：默认情况下， 参数不可更改，如果要更改， 可以加 is copy 或 is rw 又或者， 你用原来的参数名字， 像下面这样: is copy 跟 is rw的差别 is copy相当于copy一份， 而is rw， 相当于可读写， 参数还是原来的， 这可想像成C中的指针: 阅读全文

posted @ 2017-05-20 18:10 Perl6 阅读(244) 评论(0) 推荐(0) 编辑

上传绕过(转载)
摘要：1：WTS-WAF 绕过上传 原内容： Content-Disposition: form-data; name="up_picture"; filename="xss.php" 添加回车 Content-Disposition: form-data; name="up_picture"; filename="xss.ph p" 2：百度云上传绕过见下： 百度云绕过就简单的很多很多，在对文件... 阅读全文

posted @ 2017-05-18 11:49 Perl6 阅读(195) 评论(0) 推荐(0) 编辑

perl6中的hash定义(1)
摘要：my %hash = (1,2,3,4); say %hash; my %hash2 = (a => 1, b => 2); say %hash2; my %hash3 = (:name('root'), :host('localost')); say %hash3; 阅读全文

posted @ 2017-05-17 05:22 Perl6 阅读(194) 评论(0) 推荐(0) 编辑

mssql手工注入2
摘要：对于这种注入， 如果能用工具， 就用工具， 因为特别的麻烦 阅读全文

posted @ 2017-05-10 14:49 Perl6 阅读(127) 评论(0) 推荐(0) 编辑

mssql手工注入1
摘要：强制字符转成数字， 所以报错， 能获得数据 查版本号: http://www.kfgtfcj.xxx.cn/lzygg/Zixun_show.aspx?id=1 and @@version=1-- 查数据库版本: http://www.kfgtfcj.xxx.cn/lzygg/Zixun_show.aspx?id=1 and db_name()=1-- 查当前数据库用户(如果看到dbo 那么多... 阅读全文

posted @ 2017-05-10 14:28 Perl6 阅读(307) 评论(0) 推荐(0) 编辑

mssql注入中的储存用法删除与恢复
摘要：删除: 恢复: 对于mssql SA权限的注入， 最简单的运行方法可以用如下方法测试: 在注入方面， 如果要恢复， 可以这样: 或者： 在注入添恢复扩展后， 用如下方式可添加管理员与添加3389： #上面第四条语句， 是dos下的注删表操作， 关于开3389与查看3389窗口， 可查看如下链接: # 阅读全文

posted @ 2017-05-10 13:38 Perl6 阅读(351) 评论(0) 推荐(0) 编辑

perl 复制exe文件的简单方法
摘要：use warnings; use strict; open EXE, "cmd.exe" or die "Can not open cmd.exe:$!\n"; open EXEBACK, '>', 'c.exe' or die "Can not open c.exe:$!\n"; binmode(EXE); binmode(EXEBACK); while(){ print EX... 阅读全文

posted @ 2017-05-04 20:50 Perl6 阅读(332) 评论(0) 推荐(0) 编辑

导航

< 2025年4月 >
日 一 二 三 四 五 六
30 31 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 1 2 3
4 5 6 7 8 9 10
点击右上角即可分享
微信分享提示