perl 调短信接口

前端之家收集整理的这篇文章主要介绍了perl 调短信接口前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
v-lhb-app01:/home/tomcat> cat s2.pl  use Encode; use Encode::CN; use JSON;  use URI::Escape; use LWP::Simple; #$host = "http://ip.taobao.com/service/getIpInfo.PHP?ip=202.101.172.35"; $host = " http://211.149.197.95:8888/sms.aspx?action=send&userid=11&account=00026&password=99&mobile=111172722237&content=内容&sendTime=&extno="; $content = get($host); print "\$content is $content\n";

猜你在找的Perl相关文章