类似于$_,$^O,之类的变量 #!C:\perl\bin\perl #test operater system print $^O; print "\n"; if ($^O=~/Win/) { print "当前操作系统是windows操作平台"; } else { print "当前操作系统是非windows操作平台"; }
本文由 chaoslawful 和鄙人共同翻译完成。 我原来翻译过一部分,不过没有翻完,后来幸亏 chaoslawful 的努力,所以才终于完成此文。 最新版本可以从这里获取(POD 格式): http://svn.perlchina.org/trunk/POD2-CN/lib/POD2/CN/perlvar.pod [code]NAME perlvar - perl 预定义变量 DESCRIPTION 预定义名称 后面列出的名称对 perl 来说具有特殊含义。 大多数标点名称都有合理的助记方法或类似于在 shell 中的用法。 ...
具体情况是这样: perl -ne 'BEGIN{%hash} { while(/\d+ :(\d+) ,(\d+),\d+/g){ print $1,"=>",$2,"\n"; print "文件名"}} }' sms_200908*.txt 我写了上面那个perl的命令行,会读取一系列文件 sms_200908*.txt 。 我想知道读取了哪个文件,应该怎么写?有什么特殊变量吗? 实现这样的效果: sms_20090801.txt 1002=>0 1002=>0 1002=>78 1002=>0 1002=>18 1002=>0 1002=>11 sms_20090802.txt 1002=>39 1002=>18 1002=>11 1002=>...
让你的perl代码看起来更像perl代码,而不是像C或者BASIC代码,最好的办法就是去了解perl的内置变量。perl可以通过这些内置变量可以控制程序运行时的诸多方面。
本文中,我们一起领略一下众多内置变量在文件的输入输出控制上的出色表现。
行计数
我决定写这篇文章的一个原因就是,当我发现很多人都不知道“$.”内置变量的存在,这的确让我很吃惊。
我依然能看到很多人是这样写代码的:
代码
my $line_no = 0;
while (
在 smth 中看到,在此转载 ------------------------perl中常见特殊变量----------------------- 1. $_ $ARG,常常是一个默认变量 2. @_ @ARG,子例程参数表 3. $0 $PROGRAM_NAME,本程序的名字 4. @ARGV 本程序的命令行参数表 5. $" $LIST_SEPARATOR,数组内插到双引号字符串中时所用的分隔符, 默认为空格 6. $, $OFS,或$OUTPUT_FIELD_SEPARATOR,用于print的输出字段分隔符, 即一个print语句中用逗号分隔的部分之间用什...
我想取当天的时间为一个变量 在shell里面可以很容易得到 DATE=`date +%Y%m%d` 那么变量$DATE就是当天的日期。 在perl里面我想得到同样的结果该怎么做呢? 请高手帮忙!!