+ -
当前位置:首页 → 问答吧 → 几行不是很懂的代码,求解答

几行不是很懂的代码,求解答

时间:2010-08-14

来源:互联网

这是《perl高级编程》的一段小代码,*{"$(caller_packages)::$(rnvt_var_name)"} = \$ENV{$envt_var_name};这段不是很懂···对类型团很难明白~~
麻烦各位可以指教一下~··谢谢了··
  1. package Environment;
  2. sub import
  3. {
  4.         my ($caller_package) = caller;
  5.         foreach $envt_var_name (keys %ENV)
  6.         {
  7.                 *{"$(caller_packages)::$(rnvt_var_name)"} = \$ENV{$envt_var_name};
  8.         }
  9. }
复制代码

作者: wfnh   发布时间: 2010-08-14

* 可以看下Typeglobs and Symbol Tables
\$ 是传的scalar 的引用了。
perl doc都有详细说明的。

作者: redskywy   发布时间: 2010-08-14

不好意思···可能是因为网速的问题···按多了几次提交···重复发帖······希望斑竹删除多余的帖子···

作者: wfnh   发布时间: 2010-08-14