1#!/usr/bin/perl
2
3BEGIN {
4  unless ($ENV{RELEASE_TESTING}) {
5    require Test::More;
6    Test::More::plan(skip_all => 'these tests are for release candidate testing');
7  }
8}
9
10
11use strict;
12use warnings;
13
14use Test::More;
15
16eval "use Test::Spelling;";
17plan skip_all => "Test::Spelling required for testing POD spelling" if $@;
18
19my @stopwords;
20for (<DATA>) {
21    chomp;
22    push @stopwords, $_
23        unless /\A (?: \# | \s* \z)/msx; # skip comments, whitespace
24}
25
26add_stopwords(@stopwords);
27local $ENV{LC_ALL} = 'C';
28set_spell_cmd('aspell list -l en');
29all_pod_files_spelling_ok();
30
31__DATA__
32Matthew
33Horsfall
34alh
35API
36HMAC
37RNDC
38timestamp
39IPv
40TBD
41TODO
42nameserver
43