File Coverage

blib/lib/Test/t.pm
Criterion Covered Total %
statement 16 18 88.8
branch 1 2 50.0
condition 1 2 50.0
subroutine 6 7 85.7
pod 0 1 0.0
total 24 30 80.0


line stmt bran cond sub pod time code
1             package Test::t;
2             BEGIN {
3 2     2   823 $Test::t::VERSION = '0.0031';
4             }
5             # ABSTRACT: 0 to testing in 1 line
6              
7              
8 2     2   10 use strict;
  2         4  
  2         46  
9 2     2   8 use warnings;
  2         2  
  2         104  
10              
11             our ( @ISA, @EXPORT );
12              
13             BEGIN {
14              
15 2     2   1757 require Test::Most;
16 2         83726 Test::Most->import;
17              
18             }
19              
20             require File::Spec;
21              
22             BEGIN {
23 2     2   76063 @ISA = qw/ Test::Builder::Module /;
24             }
25              
26             @EXPORT = @Test::Most::EXPORT;
27              
28             sub import {
29              
30 2     2   40 strict->import;
31 2         16 warnings->import;
32              
33 2         4 my $no_plan = 1;
34 2   50     15 m/^(?:no_plan|defer_plan|tests|skip_all)$/ and undef $no_plan for @_;
35 2 50       9 splice @_, 1, 1, ( 'no_plan' ) if $no_plan;
36              
37 2         8 goto &Test::Most::import; # Let the good Test::Most do the magic
38              
39             }
40              
41             sub path {
42 0     0 0   shift;
43 0           File::Spec->canonpath( @_ );
44             }
45              
46             1;
47              
48             __END__