Branch Coverage
blib/lib/Lingua/PigLatin/Bidirectional.pm
Criterion
Covered
Total
%
branch
8
8
100.0
line
true
false
branch
24
21
8
if (my $pre = $1) { }
27
5
16
$pre =~ /\A [A-Z]/x ? :
54
8
21
if ($1) { }
60
5
16
$pre =~ /\A [A-Z]/x ? :