なんか晒すのが流行っているらしいので貼っておきますね。 use strict; use warnings; use Test::More; use Test::Requires 'Test::Spelling'; use Config; use File::Spec; use ExtUtils::MakeMaker; my %cmd_map = ( spell => 'spell', aspell => 'aspell list -l en', ispell => 'ispell -l', hunspell => 'hunspell -d en_US -l', ); my $spell_cmd; for my $dir ((split /$Config::Config{path_sep}/, $ENV{PATH}), '.') { next if $dir eq ''; ($spell_c