| lib/Egg/Plugin/Tools.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 0 | 49 | 0.0 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 135 | 0 | 0 | 0 | $arg and $arg =~ /^.+?(\d{1,2})\:(\d{1,2})(.*)/ |
| 137 | 0 | 0 | 0 | $arg and $arg =~ /^\:(\d{1,2})/ |
| line | l | !l | condition |
|---|---|---|---|
| 18 | 0 | 0 | $_[1] || q['"&<>@] |
| 61 | 0 | 0 | shift() || 32 |
| 62 | 0 | 0 | lc shift() || 'sha1' |
| 67 | 0 | 0 | $_[1] || (return 0) |
| 71 | 0 | 0 | $a || '' |
| 0 | 0 | $c || '' | |
| 100 | 0 | 0 | $e->req->referer || (return 1) |
| 139 | 0 | 0 | $hou ||= 0 |
| 0 | 0 | $min ||= 0 | |
| 0 | 0 | $sec ||= 0 | |
| 143 | 0 | 0 | $$arg[1] || 0 |
| 145 | 0 | 0 | $$arg[3] || 0 |
| 0 | 0 | $$arg[4] || 0 | |
| 0 | 0 | $$arg[5] || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 88 | 0 | 0 | 0 | shift() || croak(' I want File Regexp ') |
| 101 | 0 | 0 | 0 | $e->global->{'referer_check_regexp'} ||= do { unless ($e->config->{'allow_referer_regex'}) { $e->req->host_name ? "^https?://@{[quotemeta $e->req->host_name];}" : die('$e->request->host_name is empty.'); } } |
| 125 | 0 | 0 | 0 | shift() || croak(' I want string. ') |
| 130 | 0 | 0 | 0 | shift() || croak(' I want argument. ') |
| 144 | 0 | 0 | 0 | $$arg[2] || croak(' I want Day. ') |