File Coverage

blib/lib/HH/Unispool/Config/File/Token/Numbered/Device/6.pm
Criterion Covered Total %
statement 52 52 100.0
branch 7 14 50.0
condition 10 20 50.0
subroutine 9 9 100.0
pod 2 2 100.0
total 80 97 82.4


line stmt bran cond sub pod time code
1             package HH::Unispool::Config::File::Token::Numbered::Device::6;
2              
3 9     9   5879 use 5.006;
  9         33  
  9         372  
4 9     9   50 use base qw( HH::Unispool::Config::File::Token::Numbered::Device );
  9         20  
  9         1504  
5 9     9   48 use strict;
  9         18  
  9         341  
6 9     9   46 use warnings;
  9         16  
  9         387  
7 9     9   56 use AutoLoader qw(AUTOLOAD);
  9         16  
  9         80  
8 9     9   296 use Error qw(:try);
  9         15  
  9         71  
9 9     9   1614 use HH::Unispool::Config::File::Token qw( :rx :frm );
  9         20  
  9         7191  
10              
11             # Package version
12             our ($VERSION) = '$Revision: 0.3 $' =~ /\$Revision:\s+([^\s]+)/;
13              
14             1;
15              
16             __END__