| line |
true |
false |
branch |
|
78
|
0 |
0 |
if ($$self{'on_login_f'}) |
|
83
|
0 |
0 |
if $on_closed |
|
138
|
6 |
12 |
if exists $args{$_} |
|
141
|
1 |
5 |
if (exists $args{'nick'}) |
|
204
|
4 |
1 |
if $self->read_handle |
|
218
|
0 |
0 |
if ($args{'on_resolve_error'}) { } |
|
|
0 |
0 |
elsif ($on_error) { } |
|
227
|
0 |
0 |
if ($args{'on_connect_error'}) { } |
|
|
0 |
0 |
elsif ($on_error) { } |
|
285
|
0 |
4 |
unless my $nick = delete $args{'nick'} || $$self{'nick'} |
|
286
|
0 |
4 |
unless my $user = delete $args{'user'} || $$self{'user'} |
|
290
|
3 |
1 |
unless (defined $$self{'nick'}) |
|
295
|
0 |
4 |
unless not defined $on_login or ref $on_login eq 'CODE' |
|
299
|
2 |
2 |
if $$self{'use_caps'} |
|
301
|
0 |
4 |
if defined $pass |
|
308
|
1 |
3 |
if $on_login |
|
327
|
0 |
3 |
if (not $self->is_connected) { } |
|
354
|
1 |
0 |
if (@request) { } |
|
445
|
1 |
0 |
if ($$hints{'prefix_is_me'}) |
|
461
|
4 |
0 |
if ($$self{'on_login_f'} and @{$$self{'on_login_f'};}) |