File Coverage

lib/Parse/AFP/PTX/TRN.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/PTX/TRN.pm $ $Author: autrijus $
2             # $Rev: 1130 $ $Date: 2004-02-17T15:40:29.640821Z $
3              
4             package Parse::AFP::PTX::TRN;
5 1     1   766 use base 'Parse::AFP::PTX::ControlSequence';
  1         3  
  1         87  
6              
7 1         55 use constant SUBFORMAT => (
8             Data => 'a*',
9 1     1   5 );
  1         2  
10              
11             1;