File Coverage

blib/lib/HH/Unispool/Config/File/Token/Numbered/Device/3.pm
Criterion Covered Total %
statement 45 45 100.0
branch 6 12 50.0
condition 8 17 47.0
subroutine 9 9 100.0
pod 2 2 100.0
total 70 85 82.3


line stmt bran cond sub pod time code
1             package HH::Unispool::Config::File::Token::Numbered::Device::3;
2              
3 8     8   9549 use 5.006;
  8         31  
  8         438  
4 8     8   50 use base qw( HH::Unispool::Config::File::Token::Numbered::Device );
  8         18  
  8         1985  
5 8     8   59 use strict;
  8         23  
  8         294  
6 8     8   46 use warnings;
  8         17  
  8         297  
7 8     8   48 use AutoLoader qw(AUTOLOAD);
  8         17  
  8         69  
8 8     8   292 use Error qw(:try);
  8         20  
  8         76  
9 8     8   1649 use HH::Unispool::Config::File::Token qw( :rx :frm );
  8         18  
  8         7158  
10              
11             # Package version
12             our ($VERSION) = '$Revision: 0.3 $' =~ /\$Revision:\s+([^\s]+)/;
13              
14             1;
15              
16             __END__