深入理解Perl变量与符号用法-优快云博客

常用：

$x{}  x名字前面是美元符号($),后面是花括号({}),则其为 hash 元素
%      要引用整个 hash,使用百分号(“ )作为前缀。前面几页中使用的 hash 的名字为%family_name。
$!     系统产生的一些可读的信息,也可能是出错的信息
$_    子函数参数变量自己本身
@_    子程序的私有变量    @ 数组
&x    调用子函数x
<>   数据输入.如果没有指定文件名,则其从标准输入流中自动打开和关闭一系列文件进行读入

perl默认的内部变量：

$-当前页可打印的行数,属于Perl格式系统的一部分
$! 根据上下文内容返回错误号或者错误串
$” 列表分隔符
$# 打印数字时默认的数字输出格式
$$ Perl解释器的进程ID
$% 当前输出通道的当前页号
$& 与上个格式匹配的字符串
$( 当前进程的组ID
$) 当前进程的有效组ID
$* 设置1表示处理多行格式.现在多以/s和/m修饰符取代之.
$, 当前输出字段分隔符
$. 上次阅读的文件的当前输入行号
$/ 当前输入记录分隔符,默认情况是新行
$: 字符设置,此后的字符串将被分开,以填充连续的字段.
$; 在仿真多维数组时使用的分隔符.
$? 返回上一个外部命令的状态
$@ Perl解释器从eval语句返回的错误消息
$[ 数组中第一个元素的索引号
$\ 当前输出记录的分隔符
$] Perl解释器的子版本号
$^ 当前通道最上面的页面输出格式名字
$^A 打印前用于保存格式化数据的变量
$^D调试标志的值
$^E在非UNIX环境中的操作系统扩展错误信息
$^F最大的文件捆述符数值
$^H由编译器激活的语法检查状态
$^I内置控制编辑器的值
$^L发送到输出通道的走纸换页符
$^M备用内存池的大小
$^O操作系统名
$^P指定当前调试值的内部变量
$^R正则表达式块的上次求值结果
$^S当前解释器状态
$^T从新世纪开始算起,脚步本以秒计算的开始运行的时间
$^W警告开关的当前值
$^X Perl二进制可执行代码的名字
$_ 默认的输入/输出和格式匹配空间
$| 控制对当前选择的输出文件句柄的缓冲
$~ 当前报告格式的名字
$` 在上个格式匹配信息前的字符串
$’ 在上个格式匹配信息后的字符串
$+ 与上个正则表达式搜索格式匹配的最后一个括号
$< 当前执行解释器的用户的真实ID
$<digits>含有与上个匹配正则表达式对应括号结果
$= 当前页面可打印行的数目
$> 当前进程的有效用户ID
包含正在执行的脚本的文件名
$ ARGV 从默认的文件句柄中读取时的当前文件名
%ENV 环境变量列表
%INC 通过do或require包含的文件列表
%SIG 信号列表及其处理方式
@_ 传给子程序的参数列表
@ARGV 传给脚本的命令行参数列表
@INC 在导入模块时需要搜索的目录列表

符号->

-> 有两种用法，都和解引用有关。
第一种用法，是解引用。
根据 -> 后面跟的符号的不同，解不同类型的引用，
->[] 表示解数组引用，->{} 表示解散列引用，->() 表示解子程序引用。
例子：
$arr_ref = \@array;
$arr_ref->[0] 访问数组 @array 的第一个元素。
$hash_ref = \%hash;
$hash_ref->{foo} 访问 %hash 的 foo 分量
$sub_ref = \&test;
$sub_ref->(1, 2, 3) 使用参数列表 (1,2,3) 来调用 &test 这个子程序。

第二种用法，是调用类或者对象的方法。
格式：
$obj->method();
或者
ClassName->method();
例如：
$pop3->login( $username, $password );
my $ftp = Net::FTP->new("some.host.name", Debug => 0);
这两种用法略有不同，

但是总的来说，符合以下规则：
引用：[color=red]假设 -> 的左操作数（就是左边那个值，如 $pop3 和 Net::FTP）是 $left，右操作数（就是右边那个值，如 login 和 new）是 $right，那么 -> 的运算规则就是：

if ( ref $left 有效 ){    # 也就是说 $left 是个引用，而不是个裸字


    $ClassName = ref $left;  # 取引用的类型，当作类名称


}


else{


    $ClassName = $left;       # 直接把裸字当作类名称


}

然后调用：
&{$ClassName::$right}(

$left, 原参数列表 )
也就是说把类名称和右操作数拼在一起，当作子程序名称（注），并把左操作数当作第一个参数。

符号=>

关系操作符=>只是逗号操作符的替代物，它在显示成对的参数时非常有用。
例子：
　　 $query ->Button(-in,\$reply,-side,'left',-padx,2m,-pady,
　　 2m,-ipadx,2m,-ipady,1m)->pack(-side,'bottom');
使用符号=>:
　　$query ->Button( -in =>\$reply,
　　 -side => 'left',
　　-padx => 2m,
　　-pady => 2m,
　　 -ipadx => 2m,
　　-ipady => 1m　)->pack(-side=> 'bottom');

　　注意，如果你需要用数字“大于等于”的符号，你应该用“>=”而不是“=>”。

符号：:

“::”符号可以认为是与C语言中的“.”相似的，而它更像C++中的::类范围操作符。

　 a.b.c;
　　a::b::c(); // C++ 中的函数
　　$a::b::c; # Perl 5中的标量
　　@a::b::c; # Perl 5中的列表
　　%a::b::c; # Perl 5中的关联数组（或叫hash）
　　&a::b::c; # Perl 5中的函数
　　

另外，Perl4中的单撇号也具有相同的功能：
　　$main'foo; # Perl 4中的标量$foo
　　$main::foo; # Perl 5中的标量$foo

出于向后兼容的考虑，Perl5也运行使用$main'foo，但是仍推荐使用$main::foo。