File Coverage

lib/Parse/AFP/PGD.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             package Parse::AFP::PGD;
2 1     1   704 use base 'Parse::AFP::Record';
  1         2  
  1         111  
3              
4 1         56 use constant SUBFORMAT => (
5             XUnitBase => 'C',
6             YUnitBase => 'C',
7             XLUnitsperUnitBase => 'n',
8             YLUnitsperUnitBase => 'n',
9             Reserved1 => 'C', # '00'
10             XPageSize => 'n',
11             Reserved2 => 'C', # '00'
12             YPageSize => 'n',
13             _ => 'a*',
14 1     1   5 );
  1         2  
15              
16             1;