Branch Coverage

lib/Test/WWW/Mechanize/Driver/Util.pm
Criterion Covered Total %
branch 9 66 13.6


line true false branch
44 0 0 unless $p
48 0 0 reftype $v && 'ARRAY' eq reftype $v ? :
74 0 0 ref $_[0] eq 'SCALAR' ? :
75 0 0 @_ ? :
76 0 0 unless open my $F, $mode, $f
77 0 0 if (wantarray) { }
104 0 0 unless ref $x
106 0 0 if @_ and 'HASH' eq ref $_[-1]
107 0 0 unless exists $$o{'sep'}
108 0 0 unless exists $$o{'false_pat'} and defined $$o{'false_pat'}
110 0 0 defined $$o{'sep'} ? :
0 0 'ARRAY' eq ref $_ ? :
111 0 0 if (ref $x eq 'ARRAY') { }
112 0 0 unless $#{$x;} >= $x[0] and $$x[$x[0]]
113 0 0 if not ref $$x[$x[0]] and $$x[$x[0]] =~ /$$o{'false_pat'}/
114 0 0 if ref $$x[$x[0]] eq 'ARRAY'
115 0 0 if ref $$x[$x[0]] eq 'HASH'
116 0 0 if @x > 1
118 0 0 unless exists $$x{$x[0]} and $$x{$x[0]}
119 0 0 if not ref $$x{$x[0]} and $$x{$x[0]} =~ /$$o{'false_pat'}/
120 0 0 if ref $$x{$x[0]} eq 'ARRAY'
121 0 0 if ref $$x{$x[0]} eq 'HASH'
122 0 0 if @x > 1
145 0 4 unless ref $x
147 0 4 if @_ and 'HASH' eq ref $_[-1]
148 4 0 unless exists $$o{'sep'}
150 4 0 defined $$o{'sep'} ? :
0 4 'ARRAY' eq ref $_ ? :
151 0 4 if (ref $x eq 'ARRAY') { }
152 0 0 unless $#{$x;} >= $x[0] and defined $$x[$x[0]]
153 0 0 if @x > 1
155 1 3 unless exists $$x{$x[0]} and defined $$x{$x[0]}
156 0 3 if @x > 1