Branch Coverage

blib/lib/Text/Summary/MediaWiki.pm
Criterion Covered Total %
branch 0 50 0.0


line true false branch
31 0 0 if defined @$redirects and @$redirects > $$self{'redirect_limit'}
38 0 0 unless $text =~ /\w/
53 0 0 if ($text =~ /^#REDIRECT[ :]*\[\[(.*?)(?:#.*?)?\]\]/i)
67 0 0 if /^\s*$/
69 0 0 if (/^\s*(?:[-_#!\t}{:|<=\[]|\W*$)/ and !/^\s*\[\[/ || /\[\[Image:/i)
71 0 0 if ($maybe == 1 and /[#!{}|]/)
75 0 0 if /^\s*\*/ and not $line
76 0 0 if /^\s*\w+\s*=/
78 0 0 if ($maybe < 1 and /^(?:the\s+)?'/i)
79 0 0 if $maybe == 0
83 0 0 if ($maybe == 1) { }
0 0 elsif ($maybe == 0) { }
86 0 0 if $line
92 0 0 if (/\*/ or $maybe == 3) { }
94 0 0 unless /^\*/
95 0 0 if (/^\s*\*+\s*\[\[.*?\]\]\s*-(\s*.*?)\.?\s*$/) { }
100 0 0 $st =~ /[;:,.]$/ ? :
104 0 0 if $line
108 0 0 if length $line < $$self{'approx_length'}
112 0 0 if (defined $line)
116 0 0 exists $$self{'template_whitelist'}{_name($1)} ? :
124 0 0 if (length $line > 350)
127 0 0 unless ($line =~ s/^(.{330}[^\.]+\.).*/$1/)
143 0 0 if wantarray
156 0 0 if $x != -1