| blib/lib/Net/Kotonoha/Koto.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 30 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 0 | 0 | unless defined $$self{'kotonoha'}{'loggedin'} |
| 23 | 0 | 0 | unless ($$self{'content'}) |
| 25 | 0 | 0 | if $res->is_success |
| 43 | 0 | 0 | if ($link =~ m[^/user/(\w+)]) |
| 44 | 0 | 0 | $comment ? : |
| 56 | 0 | 0 | $comment =~ /\xe2\x97\x8b/ ? : |
| 57 | 0 | 0 | if ($answer eq $my_answer) |
| 59 | 0 | 0 | if ($link =~ m[^/user/(\w+)]) |
| 61 | 0 | 0 | unless (grep(($$_{'user'} eq $userid), @list)) |
| 90 | 0 | 0 | $t ? : |
| 97 | 0 | 0 | if (@_) { } |
| 108 | 0 | 0 | if ($res->is_success) { } |
| 112 | 0 | 0 | if ($my_comment) |
| 131 | 0 | 0 | unless @found |
| 132 | 0 | 0 | @found ? : |