12345678910111213141516 use strict;use warnings;use Test::More;my $program = 'bin/mimedecode';my $minimum_version = 5.012;SKIP: { skip "$program needs at least Perl $minimum_version. Skipping...", 1 unless $] >= $minimum_version; require './t/lib/common.pl'; sanity_test($program); }done_testing();
use
strict;
warnings;
Test::More;
my
$program
=
'bin/mimedecode'
;
$minimum_version
= 5.012;
SKIP: {
skip
"$program needs at least Perl $minimum_version. Skipping..."
, 1
unless
$] >=
require
'./t/lib/common.pl'
sanity_test(
);
}
done_testing();