以下は、今のstrict時代に非推奨なシンボリックリファレンスです。 とりあえず、perlってこんな凄いことも出来るよってことで……。 # 配列変数の例 @list = (10, 20); print $list[0] , "\n"; # これは配列のゼロ番目の要素で、「10」と表示される。 $scalar = \@list; # @listのリファレンスを代入。 print $scalar->[0] , "\n"; # これも「10」(普通のリファレンスのデリファレンス)。 $scalar = 'list'; # 単なる文字列代入。しかし、同名変数のリファレンス代入でもあるらしい… print $scalar->[0] , "\n"; # なんとこれも「10」(シンボリックリファレンスのデリファレンス)。 # スカラー変数の例 $scalar = "symbolic" . "_ref";