| 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) } } |