123456789101112 #!perluse strict;use warnings;use Test::More;eval 'use Test::Portability::Files';plan skip_all => 'Test::Portability::Files required for testing portability' if $@;run_tests();
#!perl
use
strict;
warnings;
Test::More;
eval
'use Test::Portability::Files'
;
plan
skip_all
=>
'Test::Portability::Files required for testing portability'
if
$@;
run_tests();