File Coverage

lib/Perlmazing/Perlmazing/splitdir.pm
Criterion Covered Total %
statement 4 4 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod 0 1 0.0
total 6 7 85.7


line stmt bran cond sub pod time code
1 1     1   10 use File::Spec ();
  1         2  
  1         53  
2              
3             sub main {
4 3     3 0 247 File::Spec->splitdir(@_);
5             }
6              
7             1;