perl 调短信接口

发布时间：2020-12-15 23:45:01 所属栏目：大数据来源：网络整理

导读：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

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 $contentn";

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!