ずっとスーパークラスに共通処理をまとめて書いてたけど、↓なやり方でも可能だったメモ。 ツール use strict; use lib qw(./); use File::Test; use Data::Dumper; my $test = File::Test->new(); my @work = qw( aaa bbb ); foreach ( @work ) { my $cmd = …