2012-04-25から1日間の記事一覧
以下の場合にエラーになるのなんででしょうか #!/usr/bin/env perl use strict; use warnings; my $a = [1]; # $a は arrayref $a->[0] = 999; # ok. sub hoge { return \@_; } my $b = hoge(1); # $b も arrayref $b->[0] = 999; # Modification of a read-…
以下の場合にエラーになるのなんででしょうか #!/usr/bin/env perl use strict; use warnings; my $a = [1]; # $a は arrayref $a->[0] = 999; # ok. sub hoge { return \@_; } my $b = hoge(1); # $b も arrayref $b->[0] = 999; # Modification of a read-…