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 mRuby 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 mruby mRuby Str irep