$x = { def => bar }; # $x是指向一个匿名hash的引用
print $x->{def},"/n"; # 输出``bar''
注意，在调用Perl/Tk的子程序时有多种不同的方法进行引用。我们可以比较一下：
my($top) = MainWindow->new;
和
my($top) = new MainWindow;
两种方法的不同。
但是，一般来说我们通常都使用这样的方法调用：
$top -> Widge-type;
在perlref的手册页中有详尽的关于引用、解引用、和闭包的讨论，或者也可以在下面的网页上查看Perl5的信息页：
http://www.metronet.com/perlinfo/perl5.html
在Perl/Tk的脚本中‘=>'操作符时很常见的。perlop手册页中说：关系操作符=>只是逗号操作符的替代物，它在显示成对的参数时非常有用。
你可以认为=>只是为了程序的美观和易维护而被使用的。请看，在下面的例子中，要想监测是否每个选项都有对应的值，是多么的困难：
$query -> Button(-in,/$reply,-side,'left',-padx,2m,-pady,
2m,-ipadx,2m,-ipady,1m)->pack(-side,'bottom');
而下面的这个则相反：
$query ->Button( -in => /$reply,
-side => 'left',
-padx => 2m,
-pady => 2m,
-ipadx => 2m,
-ipady => 1m
)->pack(-side => 'bottom');
顺便说一下，如果你需要用数字“大于等于”的符号，你应该用“>=”而不是“=>”。
“::”符号可以认为是与C语言中的“.”相似的，而它更像C++中的::类范围操作符。
a.b.c; /* C语言中的 */
a::b::c(); // C++ 中的函数
$a::b::c; # Perl 5中的标量
@a::b::c; # Perl 5中的列表
%a::b::c; # Perl 5中的关联数组（或叫hash）
&a::b::c; # Perl 5中的函数
另外，Perl4中的单撇号也具有相同的功能：
$main'foo; # Perl 4中的标量$foo
$main::foo; # Perl 5中的标量$foo
出于向后兼容的考虑，Perl5也运行使用$main'foo，但是仍推荐使用$main::foo。
