line |
true |
false |
branch |
52
|
0 |
0 |
if (defined $self->net_twitter) |
62
|
0 |
0 |
unless $self->brik_help_run_undef_arg('connect', $consumer_key) |
63
|
0 |
0 |
unless $self->brik_help_run_undef_arg('connect', $consumer_secret) |
64
|
0 |
0 |
unless $self->brik_help_run_undef_arg('connect', $access_token) |
65
|
0 |
0 |
unless $self->brik_help_run_undef_arg('connect', $access_token_secret) |
82
|
0 |
0 |
if ($@) { } |
|
0 |
0 |
elsif (not defined $nt) { } |
97
|
0 |
0 |
unless $self->brik_help_run_undef_arg('tweet', $message) |
99
|
0 |
0 |
unless my $nt = $self->connect |
106
|
0 |
0 |
if ($@) { } |
|
0 |
0 |
elsif (not defined $r) { } |
120
|
0 |
0 |
unless my $nt = $self->connect |
127
|
0 |
0 |
if ($@) { } |
|
0 |
0 |
elsif (not defined $r) { } |
141
|
0 |
0 |
unless my $nt = $self->connect |
154
|
0 |
0 |
unless defined $r |
175
|
0 |
0 |
if ($@) |
178
|
0 |
0 |
if ($@ =~ /Rate limit exceeded/i) |
192
|
0 |
0 |
unless my $nt = $self->connect |
204
|
0 |
0 |
unless defined $r |
223
|
0 |
0 |
if ($@) |
226
|
0 |
0 |
if ($@ =~ /Rate limit exceeded/i) |
240
|
0 |
0 |
unless $self->brik_help_run_undef_arg('follow', $username) |
242
|
0 |
0 |
unless my $nt = $self->connect |
249
|
0 |
0 |
if ($@) |
261
|
0 |
0 |
unless $self->brik_help_run_undef_arg('unfollow', $username) |
263
|
0 |
0 |
unless my $nt = $self->connect |
270
|
0 |
0 |
if ($@) { } |
|
0 |
0 |
elsif (not defined $r) { } |
295
|
0 |
0 |
unless my $nt = $self->connect |
302
|
0 |
0 |
if ($@) { } |
|
0 |
0 |
elsif (not defined $r) { } |