扫码一下
查看教程更方便
perl 语言中定义了一些特殊的变量,通常以 $, @, 或 % 作为前缀,例如:$_。
很多特殊的变量有一个很长的英文名,操作系统变量 $! 可以写为 $os_error。
如果你想使用英文名的特殊变量需要在程序头部添加 use english;。这样就可以使用具有描述性的英文特殊变量。
最常用的特殊变量为 $_,该变量包含了默认输入和模式匹配内容。实例如下:
#!/usr/bin/perl foreach ('google','jiyik','taobao') { print $_; print "\n"; }
执行以上程序,输出结果为:
google
jiyik
taobao
以下实例我们不使用 $_ 来输出内容:
#!/usr/bin/perl foreach ('google','jiyik','taobao') { print; print "\n"; }
执行以上程序,输出结果为:
google
jiyik
taobao
实例中,首先输出 "google" ,接着输出 "jiyik" ,最后输出 "taobao" 。
在迭代循环中,当前循环的字符串会放在 $_ 中, 然后 通过 print 输出。另外 print 在不指定输出变量,默认情况下使用的也是 $_。
以下是几处即使没有写明 perl 也会假定使用 $_ 的地方:
根据特殊的变量的使用性质,可以分为以下几类:
以下列出了所有的标量特殊变量,包含了特殊字符与英文形式的变量:
| $_ | 默认输入和模式匹配内容。 |
| $arg | |
| $. | 前一次读的文件句柄的当前行号 |
| $nr | |
| $/ | 输入记录分隔符,默认是新行字符。如用undef这个变量,将读到文件结尾。 |
| $rs | |
| $, | 输出域分隔符 |
| $ofs | |
| $\ | 输出记录分隔符 |
| $ors | |
| $" | 该变量同 $,类似,但应用于向双引号引起的字符串(或类似的内插字符串)中内插数组和切片值的场合。默认为一个空格。 |
| $list_separator | |
| $; | 在仿真多维数组时使用的分隔符。默认为 "\034"。 |
| $subscript_separator | |
| $^l | 发送到输出通道的走纸换页符。默认为 "\f". |
| $format_formfeed | |
| $: | the current set of characters after which a string may be broken to fill continuation fields (starting with ^) in a format. default is "\n"". |
| $format_line_break_characters | |
| $^a | 打印前用于保存格式化数据的变量 |
| $accumulator | |
| $# | 打印数字时默认的数字输出格式(已废弃)。 |
| $ofmt | |
| $? | 返回上一个外部命令的状态 |
| $child_error | |
| $! | 这个变量的数字值是errno的值,字符串值是对应的系统错误字符串 |
| $os_error or $errno | |
| $@ | 命令eval的错误消息.如果为空,则表示上一次eval命令执行成功 |
| $eval_error | |
| $$ | 运行当前perl脚本程序的进程号 |
| $process_id or $pid | |
| $< | 当前进程的实际用户号 |
| $real_user_id or $uid | |
| $> | 当前进程的有效用户号 |
| $effective_user_id or $euid | |
| $( | 当前进程的实际组用户号 |
| $real_group_id or $gid | |
| $) | 当前进程的有效组用户号 |
| $effective_group_id or $egid | |
| $0 | 包含正在执行的脚本的文件名 |
| $program_name | |
| $[ | 数组的数组第一个元素的下标,默认是 0。 |
| $] | perl的版本号 |
| $perl_version | |
| $^d | 调试标志的值 |
| $debugging | |
| $^e | 在非unix环境中的操作系统扩展错误信息 |
| $extended_os_error | |
| $^f | 最大的文件捆述符数值 |
| $system_fd_max | |
| $^h | 由编译器激活的语法检查状态 |
| $^i | 内置控制编辑器的值 |
| $inplace_edit | |
| $^m | 备用内存池的大小 |
| $^o | 操作系统名 |
| $osname | |
| $^p | 指定当前调试值的内部变量 |
| $perldb | |
| $^t | 从新世纪开始算起,脚步本以秒计算的开始运行的时间 |
| $basetime | |
| $^w | 警告开关的当前值 |
| $warning | |
| $^x | perl二进制可执行代码的名字 |
| $executable_name | |
| $argv | 从默认的文件句柄中读取时的当前文件名 |
| @argv | 传给脚本的命令行参数列表 |
| @inc | 在导入模块时需要搜索的目录列表 |
| @f | 命令行的数组输入 |
|
%inc |
散列表%inc包含所有用do或require语句包含的文件.关键字是文件名,值是这个文件的路径 |
%env |
包含当前环境变量 |
%sig |
信号列表及其处理方式 |
argv |
遍历数组变量@argv中的所有文件名的特殊文件句柄 |
stderr |
标准错误输出句柄 |
stdin |
标准输入句柄 |
stdout |
标准输出句柄 |
data |
特殊文件句柄引用了在文件中 __end__ 标志后的任何内容包含脚本内容。或者引用一个包含文件中__data__ 标志后的所有内容,只要你在同一个包有读取数据,__data__ 就存在。 |
_ (下划线) |
特殊的文件句柄用于缓存文件信息(fstat、stat和lstat)。 |
__end__ |
脚本的逻辑结束,忽略后面的文本。 |
__file__ |
当前文件名 |
__line__ |
当前行号 |
__package__ |
当前包名,默认的包名是main。 |
$n |
包含上次模式匹配的第n个子串 |
$& |
前一次成功模式匹配的字符串 |
$match |
|
$` |
前次匹配成功的子串之前的内容 |
$prematch |
|
$' |
前次匹配成功的子串之后的内容 |
|
$postmatch |
|
|
$ |
与上个正则表达式搜索格式匹配的最后一个括号。例如: /version: (.*)|revision: (.*)/&&($rev = $ ); |
|
$last_paren_match |
|
$| |
如果设置为零,在每次调用函数write或print后,自动调用函数fflush,将所写内容写回文件 |
|
$output_autoflush |
|
|
$% |
当前输出页号 |
|
$format_page_number |
|
|
$= |
当前每页长度。默认为 60。 |
|
$format_lines_per_page |
|
|
$- |
当前页剩余的行数 |
|
$format_lines_left |
|
|
$~ |
当前报表输出格式的名称。默认值是文件句柄名。 |
|
$format_name |
|
|
$^ |
当前报表输出表头格式的名称。默认值是带后缀"_top"的文件句柄名。 |
|
$format_top_name |