| line |
true |
false |
branch |
|
101
|
32 |
27 |
if (my $item = shift @{$$self{'req_queue'};}) |
|
105
|
27 |
0 |
unless $$buffref =~ s/^(.*)$CRLF// |
|
156
|
0 |
2 |
unless my $on_connected = $args{'on_connected'} or defined wantarray |
|
157
|
0 |
2 |
unless my $on_error = $args{'on_error'} or defined wantarray |
|
168
|
1 |
1 |
if $on_connected |
|
169
|
1 |
1 |
if $on_error |
|
171
|
1 |
1 |
if defined wantarray |
|
194
|
17 |
66 |
unless $$buffref =~ s/^(.*)$CRLF// |
|
197
|
46 |
20 |
if ($line =~ /^(\d{3}) +(.*)$/) { } |
|
|
20 |
0 |
elsif ($line =~ /^(\d{3})-(.*)$/) { } |
|
201
|
32 |
14 |
if ($accept{$number} or $accept{$numtype}) { } |
|
|
14 |
0 |
elsif (my $cb = $continue{$number}) { } |
|
|
0 |
0 |
elsif ($numtype eq 'err') { } |
|
202
|
0 |
32 |
if ($numtype eq 'info') { } |
|
252
|
27 |
65 |
unless @$queue |
|
256
|
31 |
34 |
if (defined $$item{'command'}) |
|
270
|
0 |
12 |
unless $message =~ /\((\d+,\d+,\d+,\d+,\d+,\d+)\)/ |
|
305
|
10 |
10 |
unless $closed |
|
406
|
0 |
3 |
unless my $user = $args{'user'} |
|
408
|
0 |
3 |
unless my $on_login = $args{'on_login'} or defined wantarray |
|
409
|
0 |
3 |
unless my $on_error = $args{'on_error'} or defined wantarray |
|
413
|
0 |
3 |
unless exists $args{'pass'} |
|
417
|
1 |
2 |
if $on_login |
|
418
|
1 |
2 |
if $on_error |
|
420
|
2 |
1 |
if defined wantarray |
|
460
|
0 |
2 |
unless defined $oldpath |
|
463
|
0 |
2 |
unless defined $newpath |
|
465
|
0 |
2 |
unless my $on_done = $args{'on_done'} or defined wantarray |
|
468
|
1 |
1 |
unless defined wantarray |
|
475
|
1 |
1 |
if $on_done |
|
476
|
1 |
1 |
if $on_error |
|
478
|
1 |
1 |
if defined wantarray |
|
514
|
0 |
2 |
unless defined $path |
|
516
|
0 |
2 |
unless my $on_done = $args{'on_done'} or defined wantarray |
|
519
|
1 |
1 |
unless defined wantarray |
|
523
|
1 |
1 |
if $on_done |
|
524
|
1 |
1 |
if $on_error |
|
566
|
0 |
4 |
unless my $on_list = $args{'on_list'} or defined wantarray |
|
569
|
1 |
3 |
unless defined wantarray |
|
571
|
4 |
0 |
defined $path ? : |
|
575
|
1 |
3 |
if $on_list |
|
576
|
1 |
3 |
if $on_error |
|
641
|
0 |
2 |
unless my $on_list = $args{'on_list'} or defined wantarray |
|
644
|
1 |
1 |
unless defined wantarray |
|
660
|
1 |
1 |
if $on_list |
|
661
|
1 |
1 |
if $on_error |
|
663
|
1 |
1 |
if defined wantarray |
|
704
|
0 |
4 |
unless my $on_list = $args{'on_list'} or defined wantarray |
|
707
|
1 |
3 |
unless defined wantarray |
|
709
|
4 |
0 |
defined $path ? : |
|
713
|
1 |
3 |
if $on_list |
|
714
|
1 |
3 |
if $on_error |
|
752
|
0 |
2 |
unless my $on_names = $args{'on_names'} or defined wantarray |
|
755
|
1 |
1 |
unless defined wantarray |
|
764
|
1 |
1 |
if $on_names |
|
765
|
1 |
1 |
if $on_error |
|
767
|
1 |
1 |
if defined wantarray |
|
804
|
0 |
2 |
unless defined $path |
|
806
|
0 |
2 |
unless my $on_data = $args{'on_data'} or defined wantarray |
|
809
|
1 |
1 |
unless defined wantarray |
|
815
|
1 |
1 |
if $on_data |
|
816
|
1 |
1 |
if $on_error |
|
858
|
0 |
7 |
unless my $on_stat = $args{'on_stat'} or defined wantarray |
|
861
|
2 |
5 |
unless defined wantarray |
|
867
|
7 |
0 |
defined $path ? : |
|
869
|
2 |
5 |
if $on_stat |
|
870
|
2 |
5 |
if $on_error |
|
872
|
5 |
2 |
if defined wantarray |
|
941
|
0 |
4 |
unless defined $args{'path'} |
|
943
|
0 |
4 |
unless my $on_stat = $args{'on_stat'} or defined wantarray |
|
948
|
2 |
2 |
unless defined wantarray |
|
957
|
2 |
2 |
if (@statlines > 1) { } |
|
969
|
2 |
4 |
/ \.$/ ? : |
|
972
|
0 |
2 |
unless @lines_with_cwd == 1 |
|
980
|
0 |
2 |
unless $$cwdstat[0] eq 'DIR' |
|
1001
|
2 |
2 |
if $on_stat |
|
1002
|
2 |
2 |
if $on_error |
|
1004
|
2 |
2 |
if defined wantarray |
|
1044
|
0 |
2 |
unless defined $path |
|
1047
|
0 |
2 |
unless defined $data |
|
1049
|
0 |
2 |
unless my $on_stored = $args{'on_stored'} or defined wantarray |
|
1052
|
1 |
1 |
unless defined wantarray |
|
1059
|
1 |
1 |
if $on_stored |
|
1060
|
1 |
1 |
if $on_error |