Test-Arrow
view release on metacpan or search on metacpan
on 'develop' => sub {
requires 'Software::License';
requires 'Test::Perl::Critic';
requires 'Test::Pod::Coverage';
requires 'Test::Pod';
requires 'Test::NoTabs';
requires 'Test::Perl::Metrics::Lite';
requires 'Test::Vars';
requires 'File::Find::Rule::ConflictMarker';
requires 'File::Find::Rule::BOM';
};
xt/08_no_bom.t view on Meta::CPAN
use Test::Arrow;
eval "use File::Find::Rule::BOM;";
Test::Arrow->plan(skip_all => "skip the no BOM test because $@") if $@;
my $arr = Test::Arrow->new;
my @foo = File::Find::Rule->bom->in('lib', 't', 'xt');
$arr->ok(scalar(@foo) == 0, 'No BOM')
or $arr->diag(join("\t", map { "'$_' has BOM." } @foo));
$arr->done_testing;
( run in 0.569 second using v1.01-cache-2.11-cpan-131fc08a04b )