/usr/share/perl5/SOAP/test_html.pl is in libsoap-wsdl-perl 3.003-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 | # perl usage:
use lib 't/lib';
use TAP::Harness;
use TAP::Formatter::HTML;
my $fmt = TAP::Formatter::HTML->new({
verbosity => -2,
});
use File::Find::Rule;
my @tests = sort { $a cmp $b } File::Find::Rule->file()
->name( '*.t' )
->in( 't/' );
local $ENV{TEST_VERBOSE} = 1;
my $harness = TAP::Harness->new(
{
formatter => $fmt ,
merge => 1,
# verbosity => 1,
lib => [ 't/lib', 'lib' ],
switches => ($ARGV[0] eq '--cover')
? [ '-MDevel::Cover=-ignore,.,-select,^lib/.+,-coverage,statement,subroutine,condition,branch' ]
: [],
});
$harness->runtests( @tests );
|