Branch Coverage
blib/lib/PPI/Token/Quote/Double.pm
Criterion
Covered
Total
%
branch
3
4
75.0
line
true
false
branch
90
0
6
unless my $self = &_INSTANCE(shift(), "PPI::Token::Quote::Double")
95
4
2
if $value =~ /[\\\$\@\'\"]/