使用Perl中的ref方法，可以判断一个引用是指向hash还是array。if (ref($user) eq 'HASH') { # $user 指向的是HASH ....} elsif (ref($user) eq 'ARRAY') { # $user 指向的是数组 ....} else { ....}
@array-数组%array-散列
