line |
true |
false |
branch |
141
|
1 |
0 |
if ($self->access_token) |
146
|
1 |
1 |
unless my $value = $$args{$key} |
147
|
1 |
0 |
ref $value eq 'ARRAY' ? : |
150
|
4 |
2 |
unless defined $$args{$key} |
163
|
1 |
1 |
unless $message =~ s/\@\[ (\w+) : ([^\]]+) \]/$2/ox |
262
|
1 |
0 |
if ($$args{'message'}) |
267
|
2 |
3 |
if $name eq 'to' or $name eq 'action' |
270
|
1 |
0 |
if (@$tags) |
327
|
4 |
0 |
if $url->host |
336
|
0 |
4 |
if (ref $json eq 'HASH' and $$json{'error'}) { } |
|
0 |
4 |
elsif ($res->error) { } |
|
0 |
4 |
elsif (not $json) { } |
337
|
0 |
0 |
if $$json{'error'}{'message'} |
355
|
1 |
4 |
if $url->host |