blib/lib/Gruntmaster/Opener.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 7 | 8 | 87.5 |
line | true | false | branch |
---|---|---|---|
18 | 0 | 4 | unless $parms =~ /contest=(\w+)/su |
20 | 3 | 1 | $req =~ m[/pb/(\w+)]su ? : |
24 | 4 | 4 | unless my($owner, $datetime, $request, $parms) = $_[0] =~ /(\w+)\s # user \[([^]]+)\]\s # date "\w+\s # request method ([^" ?]+) # URL (without query string) [?] ([^" ]+)\s # query string [^"]+"\s # HTTP version 2 # response code starts with 2 /sux |
34 | 1 | 3 | unless my($pb, $ct) = _analyze_request($request, $parms) |