Branch Coverage

blib/lib/URI/Sequin.pm
Criterion Covered Total %
branch 5 36 13.8


line true false branch
88 0 0 if $@
90 0 0 unless (defined $URI::Sequin::log_types{$log_file_type})
97 0 0 if ($log_file_line =~ /$URI::Sequin::log_types{$log_file_type}/i)
126 0 0 unless $query_string
135 0 0 if ($location =~ m[(http://)?(\d+\.\d+\.\d+\.\d+(\:\d+)?)/])
139 0 0 if ($location =~ m[^(.+?\. ([^\.]+) \. (com|net|org|int|mil|\w\w| (gov|mil|com|net|org|\w\w)\.\w\w ) (?:/|:\d+/) )]x) { }
0 0 elsif ($location =~ m[^(http://)?((\w+)\.\w+(\:\d+/?)?)]) { }
0 0 elsif ($location =~ m[^(http://)?((\w+)([^\.\w:]|(\:\d+/?)?))]) { }
188 0 0 if ($location =~ /$se_regex/)
198 0 0 if (defined $search_engine_url and not $search_engine_url =~ m[^https?://])
226 0 1 unless $query_string
231 0 1 if ($query_string =~ m[q=cache\:.+/(.+?)&]i)
249 1 0 if ($query_string =~ /(?
263 0 1 if $key_string =~ /(%02|%7C%7C)/
277 1 0 unless $false
353 0 0 if ($query_string =~ /(^|\&)$_=(.+?)(\&|$)/i)
363 0 0 if ($key_string =~ /\w/)
378 0 0 unless ($query_string =~ /\=/)