perlを書くけど会社の先人たちのコードに四苦八苦しています。 #例１ #! /usr/bin/env perl my $val = 1; hoge(); $val = 2; hoge(); sub hoge { print $val . "\n"; } 関数内で引数取り込まないのやめてほしい。 呼び出し時のスコープの変数をもって関数は…