use strict; use Test::More; eval q{ use Test::Spelling }; plan skip_all => "Test::Spelling is not installed." if $@; add_stopwords(map { split /[\s\:\-]/ } ); $ENV{LANG} = 'C'; my $spell_cmd; foreach my $path (split(/:/, $ENV{PATH})) { -x "$path/spell" and $spell_cmd="spell", last; -x "$path/ispell" and $spell_cmd="ispell -l", last; -x "$path/aspell" and $spell_cmd="aspell list", last; } plan skip_all => "no spell/ispell/aspell" unless $spell_cmd; set_spell_cmd($spell_cmd); all_pod_files_spelling_ok('lib'); __DATA__ Tokuhiro Matsuno Module::Advisor tokuhirom AAJKLFJEF GMAIL COM Tatsuhiko Miyagawa Kazuhiro Osawa lestrrat typester cho45 charsbar coji clouder gunyarakun hio_d hirose31 ikebe kan kazeburo daisuke maki TODO API URL URI db TTerse irc org CSS Amon Tokuhiro Matsuno Svn svn diff Gosuke Miyashita mysqldiff mmm tokuhirom's AutoInactiveDestroy CPAN DBI DoCoMo FULLWIDTH JSON Plack Proclet RT Starman Teng VM XS chunked colourful ddf https pm segv uri