1#!/usr/bin/perl 2 3use strict; 4use warnings; 5use Test::More; 6 7my $ispell_path = eval q{ 8 use Test::Spelling; 9 use File::Which; 10 which('ispell') || die 'no ispell' 11}; 12plan skip_all => 'Optional Test::Spelling, File::Which and ispell program required to spellcheck POD' if $@; 13set_spell_cmd("$ispell_path -l"); 14add_stopwords( <DATA> ); 15all_pod_files_spelling_ok(); 16 17__DATA__ 18AnnoCPAN 19CPAN 20perlmonks 21RSS 22Boumans 23Cees 24Godin 25Harkins 26Hek 27Purkis 28Schleicher 29Muhlestein 30Perrin 31Prew 32Krieger 33LICENCE 34McCann 35Jos 36Jost 37qa 38Adrian 39Cantrell 40Janek 41Jore 42ben 43Khemir 44Nadim 45Pagaltzis 46Dolan 47RT 48Ricardo 49Signes 50