Data::Aliasが驚異的だ。 use Data::Alias; alias my $a = $x; # $aは$xのエイリアス alias{ my $a = $x; # $aは$xのエイリアス }; alias push @a, $x; # @aに$xのエイリアスをプッシュ このマジックはPL_checkハックによって実現されている。