2016年11月30日

perl版 Webshell存活检测

摘要: 原理: 检测url返回状态即可 源码: #等有时间优化一下 #注意, 这个是用于win版本, 因为开头的#!路径, 还有就是system(‘cls’)用于WIN, 如果是linux的话 #请修改system(‘cls’)为system(‘clear’) #再把开头的#!c:\\perl\\bin\\ 阅读全文

posted @ 2016-11-30 22:44 Perl6 阅读(741) 评论(0) 推荐(0) 编辑

关于perl闭包(个人理解)

摘要: 我个人理解,就是当一个变量超出作用域时,应是消失了,不见了的,但你还能访问它,这就是闭包。 # #看下面的例子。 如果如下: 因为{}超出后,$value不存在了,所以print变成打印一个未定义的变量,会出错。 再来看一个例子: 结果如下: # 可以看到,这个$value应是不存在了的,但还能访问 阅读全文

posted @ 2016-11-30 22:43 Perl6 阅读(890) 评论(0) 推荐(0) 编辑

sql注入绕过union select过滤

摘要: 1 # 2 # 3 # 4 #WAF Bypassing Strings: 5 6 /*!%55NiOn*/ /*!%53eLEct*/ 7 8 %55nion(%53elect 1,2,3)-- - 9 10 +union+distinct+select+ 11 12 +union+distinctROW+select+ 13... 阅读全文

posted @ 2016-11-30 22:40 Perl6 阅读(17048) 评论(3) 推荐(1) 编辑

3.Perl 多线程:Threads(exit thread_only)

摘要: 还可以在导入threads模块时设置: 阅读全文

posted @ 2016-11-30 22:37 Perl6 阅读(776) 评论(0) 推荐(0) 编辑

2.Perl 多线程:Threads(线程返回值)

摘要: 对于函数调用, 如果要得到返回列表, 你应要用一个@values来获得返回值: 在多线程中, 想得到线程返回程, 那就调用join方法, 如果没必要获取返回值, 要调用detach方法, 如果两个都不调用, 会得到一个警告。 一般来说, 都应调用join/detach方法。 阅读全文

posted @ 2016-11-30 22:36 Perl6 阅读(828) 评论(0) 推荐(0) 编辑

1.Perl 多线程:Threads

摘要: Perl 多线程:Threads 1 阅读全文

posted @ 2016-11-30 22:31 Perl6 阅读(2179) 评论(0) 推荐(0) 编辑

导航