Perl ref 函数

描述

如果 EXPR 是一个引用，则此函数返回一个真值；如果未提供 EXPR，则返回 $_ 是否为引用。返回的实际值也定义了引用所引用的实体的类型。

内置类型有：

• REF
• SCALAR
• ARRAY
• HASH
• CODE
• GLOB
• LVALUE
• IO::Handle

如果一个变量使用 bless() 函数进行了祝福，则会返回新的数据类型。新的数据类型通常是一个类名。

语法

以下是此函数的简单语法：

ref EXPR

ref

返回值

如果非引用，则此函数返回空字符串；如果在标量上下文中为引用，则返回字符串。

示例

以下示例代码展示了其基本用法：

#!/usr/bin/perl -w

$foobar = { };
bless($foobar, 'ATMPCLASS');
print "ref() \$foobar is now in class ", ref($foobar), "\n";

执行以上代码时，会产生以下结果：

ref() $foobar is now in class ATMPCLASS