blib/lib/AI/CleverbotIO.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 0 | 18 | 0.0 |
line | true | false | branch |
---|---|---|---|
67 | 0 | 0 | if $self->has_nick |
74 | 0 | 0 | if @_ |
81 | 0 | 0 | if $self->has_nick and length $self->nick |
87 | 0 | 0 | if exists $data->{'nick'} |
100 | 0 | 0 | unless ref $response eq 'HASH' |
105 | 0 | 0 | if $status != 200 and $status != 400 |
108 | 0 | 0 | if $response->{'success'} |
115 | 0 | 0 | unless ($encoded) |
119 | 0 | 0 | unless my $decoded = eval { do { decode_json($encoded) } } |