Branch Coverage

blib/lib/WWW/LargeFileFetcher.pm
Criterion Covered Total %
branch 0 28 0.0


line true false branch
91 0 0 if (@_ != 0)
92 0 0 if (ref $_[0] eq 'HASH') { }
105 0 0 unless my $ua = 'LWP::UserAgent'->new('keep_alive', 1)
109 0 0 if (exists $$self{'timeout'})
112 0 0 if (exists $$self{'proxy'})
115 0 0 if (exists $$self{'agent'})
139 0 0 unless ($set)
140 0 0 unless (open FILE, ">$file")
148 0 0 unless (print FILE $_[0])
156 0 0 if (fileno FILE)
157 0 0 unless (close FILE)
163 0 0 if ($$self{'err_code'} == -1)
168 0 0 if (defined $res and $res->code == 200) { }
190 0 0 if (defined $res and $res->code == 200) { }