Branch Coverage

blib/lib/Text/NeatTemplate.pm
Criterion Covered Total %
branch 0 158 0.0


line true false branch
378 0 0 unless $template
386 0 0 if ($targ =~ /^\$(\w+[-:\w]*)$/) { }
0 0 elsif ($targ =~ /^\?([-\w]+)\s(.*)!!(.*)$/) { }
0 0 elsif ($targ =~ /^\?([-\w]+)\s(.*)$/) { }
0 0 elsif ($targ =~ /^\&([-\w:]+)\((.*)\)$/) { }
464 0 0 unless $targ
465 0 0 if ($targ =~ /^\$(\w+[-:\w]*)$/) { }
0 0 elsif ($targ =~ /^\?([-\w]+)\s(.*)!!(.*)$/) { }
0 0 elsif ($targ =~ /^\?([-\w]+)\s(.*)$/) { }
0 0 elsif ($targ =~ /^\&([-\w:]+)\((.*)\)$/) { }
470 0 0 if (defined $val) { }
487 0 0 if ($val) { }
505 0 0 if ($val) { }
561 0 0 if (exists $args{'data_hash'}{$varname}) { }
563 0 0 if (not $args{'show_names'} or $args{'show_names'}{$varname}) { }
584 0 0 if ($value and $self->{'escape_html'})
612 0 0 unless $_ = $style
614 0 0 if /^upper/i
615 0 0 if /^lower/i
616 0 0 defined $value ? :
0 0 if /^int/i
617 0 0 if /^float/i
618 0 0 if /^string/i
619 0 0 if /^trunc(?:ate)?(\d+)/
620 0 0 if /^dollars/i
623 0 0 if /^percent/i
627 0 0 if /^url/i
628 0 0 if /^wikilink/i
629 0 0 if /^email/i
630 0 0 if (/^hmail/i)
635 0 0 if /^html/i
636 0 0 if (/^title/i)
640 0 0 if (/^comma_front/i)
644 0 0 if (/^proper/i)
648 0 0 if (/^month/i)
649 0 0 unless $value
650 0 0 $value == 12 ? :
0 0 $value == 11 ? :
0 0 $value == 10 ? :
0 0 $value == 9 ? :
0 0 $value == 8 ? :
0 0 $value == 7 ? :
0 0 $value == 6 ? :
0 0 $value == 5 ? :
0 0 $value == 4 ? :
0 0 $value == 3 ? :
0 0 $value == 2 ? :
0 0 $value == 1 ? :
688 0 0 if (/^nth/i)
689 0 0 unless $value
690 0 0 $value =~ /3$/ ? :
0 0 $value =~ /2$/ ? :
0 0 $value =~ /1$/ ? :
0 0 $value =~ /1[123]$/ ? :
704 0 0 if (/^facettag/i)
714 0 0 if (/^namedalpha/i)
719 0 0 if (/^alphadash/i)
728 0 0 if (/^alphahyphen/i)
737 0 0 if (/^alphahash/i)
742 0 0 if (/^alpha/i)
746 0 0 if (/^pipetocomma/i)
750 0 0 if (/^pipetoslash/i)
754 0 0 if (/^words(\d+)/)
756 0 0 unless $ct > 0
761 0 0 if (/^wlink_(\w+)/)
765 0 0 if (/^tagify/i)
776 0 0 if (/^item(\d+)/)
778 0 0 unless $ct >= 0
782 0 0 if (/^itemslash(\d+)/)
784 0 0 unless $ct >= 0
788 0 0 if (/^items_(\w+)/)
798 0 0 if (/^itemsjslash_(\w+)/)
808 0 0 if (/^itemsjcomma_(\w+)/)
861 0 0 unless ($progname)
871 0 0 if ($pid) { }
878 0 0 unless close $fh
886 0 0 unless exec {$progname;} @prog_and_args
905 0 0 unless ($fieldname)
909 0 0 unless ($value)