Branch Coverage

blib/lib/PostScript/DecodeGlyphName.pm
Criterion Covered Total %
branch 6 12 50.0


line true false branch
45 6 21 (($digits) = reverse() =~ /$u_notation/x) ? :
5 27 (($digits) = /$uni_notation/x) ? :
0 32 exists $agl{$_} ? :
51 0 32 /\A(.+?)\./ ? :
63 0 0 unless open my $fh, "<", $_[0]
70 0 0 unless exists $reader{$input_method}