Branch Coverage

blib/lib/MyCPAN/App/DPAN/CPANUtils.pm
Criterion Covered Total %
branch 0 22 0.0


line true false branch
73 0 0 unless eval { do { $logger->can('debug') } }
75 0 0 unless (eval { do { require LWP::Simple } })
81 0 0 unless (-d $directory)
88 0 0 unless (-d $author_dir or mkdir $author_dir)
103 0 0 if (-e $file and -M $file < 600)
116 0 0 if (LWP::Simple::is_success($http_status))
137 0 0 unless eval { do { $logger->can('debug') } }
139 0 0 unless (-d $directory)
146 0 0 unless (-d $author_dir or mkdir $author_dir)
208 0 0 if -e $filename
211 0 0 unless (open $fh, '>:utf8', $filename)