perl6 Net::HTTP 发送任意 url 请求例子
摘要：
只做个笔记， 用 HTTP::UserAgent 的话, url 中有特殊点的符号会请求不了， 用 Net::HTTP 能很好的发送请求。 $html 返回的是 Buf 数据， 记得decode。 阅读全文
posted @ 2018-01-06 02:34 Perl6 阅读(297) 评论(0) 推荐(0) 编辑
禅道CMS 获文件名脚本
摘要：
use Net::HTTP::GET; use Base64; my %header = :Cookie; #my $response = Net::HTTP::GET("http://172.16.57.128/zentaopms/www/index.php?m=editor&f=edit&filePath=YzpccGhwc3R1ZHlcV1dXXHplbnRhb3Btc1x3d3dc... 阅读全文
posted @ 2018-01-06 00:45 Perl6 阅读(475) 评论(1) 推荐(0) 编辑
