perl
xqy1522
这个作者很懒,什么都没留下…
展开
-
查看安装的Perl模块
<br />转自:http://blog.sina.com.cn/s/blog_4af3f0d20100faph.html<br /> <br />方法一:<br />perl -M 模块名 -e '' 如果没反应,表示有<br />方法二:使用perldoc相应文档,例如CGI.pl是随perl发布的一个模块<br />$ perldoc CGI<br /><br /><br />方法三:利用命令<br /> <br />#!/usr/bin/perl use strict; use ExtU转载 2010-07-14 09:46:00 · 3038 阅读 · 0 评论 -
perl的select用法
<br />用法: select FILEHANDLE<br />返回当前选择的文件句柄,可以把当前的文件句柄设置为默认的输出,此时1.没有指定句柄的“write”和“print”的默认输出为设置为FILEHANDLE 2.和输出相关的变量会使用设置的输出通道。<br /> <br />例如:<br />open(FILE,">/abc/file"); $|=1; $f=select FILE; print "abc"; select $f; print "abc"; <br /> <br />可原创 2010-07-14 00:14:00 · 2928 阅读 · 0 评论 -
perl通过网关发短信程序
<br />sub send_phone_msg { my $NOWTIME = `/bin/date +'%d %k:%M:%S'`; chomp($NOWTIME); my $A='$1'; my $B='$2'; my $IP=`/sbin/ifconfig |grep "inet addr" |grep -v 127.0.0 |awk -F ":" '{print $B}' |awk '{print $A}'|head -1`; c原创 2010-07-14 00:25:00 · 1052 阅读 · 0 评论