Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
branch: master
Fetching contributors…

Cannot retrieve contributors at this time

19 lines (15 sloc) 0.369 kb
use strict;
use warnings;
use Test::More;use Test::Requires 'Test::Script::Shebang';
use File::Find qw/find/;
my @files;
for my $dir (qw/bin script/) {
next unless -d $dir;
find +{
no_chdir => 1,
wanted => sub { push @files, $_ if -f },
}, $dir;
}
plan skip_all => 'script not found' unless @files;
check_shebang(@files);
done_testing;
Jump to Line
Something went wrong with that request. Please try again.