Condition Coverage

blib/lib/Net/Random.pm
Criterion Covered Total %
condition 19 21 90.4


or 3 conditions

line l !l&&r !l&&!r condition
176 0 1 33 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'}
1 1 32 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/
2 1 31 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/ or not $params{'min'} =~ /^-?\d+$/
2 1 30 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/ or not $params{'min'} =~ /^-?\d+$/ or not $params{'max'} =~ /^-?\d+$/
2 2 28 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/ or not $params{'min'} =~ /^-?\d+$/ or not $params{'max'} =~ /^-?\d+$/ or $params{'max'} > 4294967295
3 1 27 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/ or not $params{'min'} =~ /^-?\d+$/ or not $params{'max'} =~ /^-?\d+$/ or $params{'max'} > 4294967295 or $params{'min'} >= $params{'max'}
3 0 27 grep {not $_ =~ /^(src|min|max|ssl)$/;} keys %params or not exists $params{'src'} or not $params{'src'} =~ /^(fourmilab\.ch|random\.org|qrng\.anu\.edu\.au)$/ or not $params{'min'} =~ /^-?\d+$/ or not $params{'max'} =~ /^-?\d+$/ or $params{'max'} > 4294967295 or $params{'min'} >= $params{'max'} or $params{'max'} - $params{'min'} > 4294967295