Tk::Error: Use of freed value in iteration at /Users/kono/src/card9/40seives.pl line 341.
とか言うエラーが。どうも、for $i ( @{$hoge} ) {} の loop の中で $hoge をいじるとでてしまうらしい。
my @hoge1 = @{$hoge};for $i ( @hoge1 ) {}
とするとでなくなるらしいです。
Perl は比較的後方互換性を維持してくれるんだけどな。あと、
my @hoge1 = @{$hoge};for my $i ( @hoge1 ) {}
としないと、
Attempt to free unreferenced scalar: SV
とかいうエラーが。これは、おそらく Perl/Tk からみだな〜
Perl/Tk は授業で使っていたりします。ごめんなさい。epkg に入れておきましたので許して下さい。
Perl/Tk は Aqua base で使いたい...
No comments:
Post a Comment