もう一つスコープをネストしてみた。 #!/usr/bin/perl use strict; use warnings; $\ = "\n"; our $var = 'our'; sub func() { $var = 'func'; print $var; } print $var; scope_a: { local $var = 'local'; print $var; func(); print $var; scope_a_a: { l…

まんどくさいから、あえてlocalに関しては無視してきた。どうしても必要な箇所って今までなかったしなあ。プログラミングperlには、 ourは名前をスコープ内に限定し、localは値をスコープ内に限定し、myは名前と値の両方をスコープ内に限定する。 とある。す…