Branch Coverage

blib/lib/CPAN/Mini/Tested.pm
Criterion Covered Total %
branch 26 50 52.0


line true false branch
41 0 0 basename($file) eq $TESTDB ? :
48 0 0 if defined $$self{'test_db_arch'}
56 0 0 unless defined $test_db_age
58 0 0 if ($$self{'force'} or not -e $local_file or $test_db_age >= 0 and -e $local_file and -M $local_file > $test_db_age)
68 0 0 if ($status == 200) { }
0 0 elsif ($status == 304) { }
78 0 0 if -r $local_file
106 0 1 unless -r $database
108 0 1 unless $$self{'test_db_conn'}
111 0 1 unless $$self{'test_db'} = 'DBI'->connect('DBI:SQLite:dbname=' . $database, '', '', {'RaiseError', 1, %{{} unless $$self{'test_db_conn'};}})
117 0 1 unless $$self{'test_db_sth'} = $self->_dbh->prepare("\n SELECT COUNT(id) \n FROM cpanstats\n WHERE status='PASS' \n AND dist=? \n AND version=? \n AND osname=?\n ")
132 1 0 if ($self->_dbh)
133 1 0 if $self->_sth
143 0 16 unless $sth
148 16 0 if $row
154 5 1 if $$self{'test_db_cache'}
166 1 28 unless defined $$self{'test_db_cache'}
168 5 24 if ($$self{'test_db_exceptions'})
170 1 4 if (ref $$self{'test_db_exceptions'} eq 'CODE') { }
171 1 0 if &{$$self{'test_db_exceptions'};}($path)
175 2 2 if (ref $$self{'test_db_exceptions'} eq 'ARRAY') { }
2 0 elsif (not ref $$self{'test_db_exceptions'} or ref $$self{'test_db_exceptions'} eq 'Regexp') { }
183 3 1 if $path =~ $re->re
187 13 12 if $$self{'test_db_cache'}->has_key($path)
200 6 6 if (ref $$self{'test_db_os'} eq 'ARRAY') { }