判断变量是何种类型

在perl函数传递过程中，我们有时候需要判断入参是hash类型，还是数组时，我们可以使用ref系统函数来判断，代码如下：

my %hash =();
my @arr = ();
my $hash_ref = {};
my $var = ();

#ref expr  要求expr是个引用，否则ref函数返回空
print ref \%hash, "\n";
print ref \@arr, "\n";

print ref $hash_ref, "\n";
print ref \$var, "\n";

运行结果：

HASH
ARRAY
HASH
SCALAR

具体ref会返回几种类型可以使用perldoc -f ref 命令行来出查看，结果如下：