File Coverage

lib/Parse/AFP/MCC.pm
Criterion Covered Total %
statement 6 6 100.0
branch n/a
condition n/a
subroutine 2 2 100.0
pod n/a
total 8 8 100.0


line stmt bran cond sub pod time code
1             # $URL: //local/member/autrijus/Parse-AFP/lib/Parse/AFP/MCC.pm $ $Author: autrijus $
2             # $Rev: 1130 $ $Date: 2004-02-17T15:40:29.640821Z $
3              
4             package Parse::AFP::MCC;
5 1     1   942 use base 'Parse::AFP::Record';
  1         3  
  1         105  
6              
7 1         67 use constant SUBFORMAT => (
8             Data => 'a*', # not yet parsed!
9 1     1   5 );
  1         2  
10              
11             1;