perl ref 用法？
我一个clear quest软件看到如下脚本

Perl code

my ($result);my ($param)=@_;  if (ref ($param) eq "CQEventObject") {        # add your CQEventObject parameter handling code here            } elsif (ref (\$param) eq "SCALAR") {        # add your scalar parameter handling code here        # The Web clients support scalar paramter type only,        # so the hook code added in the above section, needs to be duplicated here            } else {        # add your handling code for other type parameters here, for example:        # die("Unknown parameter type");    }

第一个ref，ref ($param) eq "CQEventObject"
第二个ref，ref (\$param) eq "SCALAR" 参数里有 \ 反斜杠。这两句话有什么区别吗？
\$param是否表示是$param的引用？
perl 中的引用是否也可以理解为指针？


[解决办法]
看下ref的文档吧。简单来说，是用来获取指向对象的类型的。
引用就是安全的指针，可以这样理解。