Perl/リファレンス
Perl >
リファレンスについて
my $var = 44; my $ref = \$var; # $varへのリファレンス print $ref; # スカラ変数のリファレンス print ${$ref}; # 実体 my @var = ("a".."f"); my $ref = \@var; # @varへのリファレンス print $ref; # 配列へのリファレンス print @{$ref}; # 実体 my $sub = sub { my $i = shift; return $i+1; }; # コードリファレンス; クロージャ print $sub->(33); # リファレンスのコードを実行; 34と返る print &{$sub}(33); # 等価
Last modified:2007/01/14 14:42:45
0.10519