1#!./perl 2 3BEGIN { 4 chdir '..' unless -d 't'; 5 unshift @INC, 'lib'; 6} 7 8use strict; 9require 't/test.pl'; 10 11my $result = runperl(switches => ['-f', '-Ilib'], 12 progfile => 'Porting/pod_rules.pl', 13 args => ['--tap']); 14 15print $result; 16