教程 > perl 教程 > 阅读:33

perl 特殊变量——迹忆客-ag捕鱼王app官网

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 也会假定使用 $_ 的地方:

  • 各种单目函数,包括像 ord() 和 int() 这样的函数以及除 "-t"以外所有的文件 测试操作 ("-f","-d"),"-t" 默认操作 stdin。
  • 各种列表函数,例如 print() 和 unlink()。
  • 没有使用 "=~" 运算符时的模式匹配操作 "m//"、"s///" 和"tr///"。
  • 在没有给出其他变量时是 "foreach" 循环的默认迭代变量。
  • grep() 和 map() 函数的隐含迭代变量。
  • 当 "while" 仅有唯一条件,且该条件是对 ""操作的结果进行测试时,$_ 就是存放输入记录的默认位置。除了"while" 测试条件之外不会发生这种情况。(助记:下划线在特定操作中是可以省略的。)

特殊变量类型

根据特殊的变量的使用性质,可以分为以下几类:

  • 全局标量特殊变量。
  • 全局数组特殊变量。
  • 全局哈希特殊变量。
  • 全局特殊文件句柄。
  • 全局特殊常量。
  • 正则表达式特殊变量。
  • 文件句柄特殊变量。

全局标量特殊变量

以下列出了所有的标量特殊变量,包含了特殊字符与英文形式的变量:

$_ 默认输入和模式匹配内容。
$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

查看笔记

扫码一下
查看教程更方便
网站地图