Branch Coverage

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


line true false branch
418 0 0 unless $template
426 0 0 if ($targ =~ /^\$(\w+[-:\w]*)$/) { }
0 0 elsif ($targ =~ /^\?([-\w]+)\s(.*)!!(.*)$/) { }
0 0 elsif ($targ =~ /^\?([-\w]+)\s(.*)$/) { }
0 0 elsif ($targ =~ /^\&([-\w:]+)\((.*)\)$/) { }
504 0 0 unless $targ
505 0 0 if ($targ =~ /^\$(\w+[-:\w]*)$/) { }
0 0 elsif ($targ =~ /^\?([-\w]+)\s(.*)!!(.*)$/) { }
0 0 elsif ($targ =~ /^\?([-\w]+)\s(.*)$/) { }
0 0 elsif ($targ =~ /^\&([-\w:]+)\((.*)\)$/) { }
510 0 0 if (defined $val) { }
527 0 0 if ($val) { }
545 0 0 if ($val) { }
601 0 0 if (exists $args{'data_hash'}{$varname}) { }
603 0 0 if (not $args{'show_names'} or $args{'show_names'}{$varname}) { }
624 0 0 if ($value and $self->{'escape_html'})
652 0 0 unless $_ = $style
654 0 0 if /^upper/i
655 0 0 if /^lower/i
656 0 0 defined $value ? :
0 0 if /^int/i
657 0 0 if /^float/i
658 0 0 if /^string/i
659 0 0 if /^trunc(?:ate)?(\d+)/
660 0 0 if /^dollars/i
663 0 0 if /^percent/i
667 0 0 if /^url/i
668 0 0 if /^wikilink/i
669 0 0 if /^span/i
670 0 0 if /^email/i
671 0 0 if (/^hmail/i)
676 0 0 if /^html/i
677 0 0 if (/^title/i)
681 0 0 if (/^comma_front/i)
685 0 0 if (/^proper/i)
690 0 0 if (/^date_year/i)
691 0 0 unless $value
695 0 0 if (/^date_mth/i)
696 0 0 unless $value
700 0 0 if (/^date_day/i)
701 0 0 unless $value
705 0 0 if (/^date_month/i)
706 0 0 unless $value
707 0 0 if ($value =~ /^([0-9]+)-([0-9]+)-([0-9]+)/)
714 0 0 if (/^month/i)
717 0 0 if (/^nth/i)
718 0 0 unless $value
719 0 0 $value =~ /3$/ ? :
0 0 $value =~ /2$/ ? :
0 0 $value =~ /1$/ ? :
0 0 $value =~ /1[123]$/ ? :
733 0 0 if (/^facettag/i)
743 0 0 if (/^namedalpha/i)
748 0 0 if (/^alphadash/i)
757 0 0 if (/^alphahyphen/i)
766 0 0 if (/^alphahash/i)
771 0 0 if (/^alpha/i)
775 0 0 if (/^pipetocomma/i)
779 0 0 if (/^pipetoslash/i)
783 0 0 if (/^words(\d+)/)
785 0 0 unless $ct > 0
790 0 0 if (/^wlink_(\w+)/)
794 0 0 if (/^tagify/i)
805 0 0 if (/^camelise/i)
812 0 0 if (/^item(\d+)/)
814 0 0 unless $ct >= 0
818 0 0 if (/^itemslash(\d+)/)
820 0 0 unless $ct >= 0
824 0 0 if (/^items_(\w+)/)
834 0 0 if (/^itemss_(\w+)/)
849 0 0 if (/^itemsjslash_(\w+)/)
859 0 0 if (/^itemsjcomma_(\w+)/)
907 0 0 unless $value
908 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 ? :
965 0 0 unless ($progname)
975 0 0 if ($pid) { }
982 0 0 unless close $fh
990 0 0 unless exec {$progname;} @prog_and_args
1009 0 0 unless ($fieldname)
1013 0 0 unless ($value)