| line |
true |
false |
branch |
|
193
|
1 |
24 |
if scalar @{$self->_remaining_states;}
|
|
206
|
1 |
0 |
wantarray ? :
|
|
231
|
0 |
0 |
if $rv
|
|
233
|
0 |
0 |
if (time <= $end) { }
|
|
|
0 |
0 |
elsif ($args{'on_timeout'}) { }
|
|
241
|
0 |
0 |
if defined $args{'description'}
|
|
441
|
0 |
1 |
if (ref $src) { }
|
|
445
|
0 |
1 |
unless open my $sh, '<', $src
|
|
452
|
1 |
0 |
if (ref $tgt) { }
|
|
456
|
0 |
0 |
unless open my $th, '<', $tgt
|
|
467
|
0 |
2 |
unless defined($r = sysread($src_h, $buf, $size))
|
|
469
|
1 |
1 |
unless $r
|
|
471
|
0 |
1 |
unless $t = syswrite($tgt_h, $buf, $r - $w, $w)
|
|
475
|
0 |
1 |
if $close_tgt
|
|
477
|
1 |
0 |
if $close_src
|
|
488
|
1 |
28 |
unless @{$self->_remaining_states;}
|
|
492
|
1 |
27 |
if $expect->{'cmd'} ne $cmd
|
|
494
|
20 |
7 |
if ($expect->{'args'})
|
|
495
|
1 |
19 |
unless ($cmp->Cmp($expect->{'args'}, $args))
|
|
502
|
6 |
20 |
if ($fh) { }
|
|
|
1 |
19 |
elsif ($expect->{'content'} or $expect->{'content_from_file'} or $expect->{'content_base64'}) { }
|
|
503
|
3 |
3 |
if (defined $expect->{'content'}) { }
|
|
|
1 |
2 |
elsif ($expect->{'content_from_file'}) { }
|
|
|
1 |
1 |
elsif ($expect->{'content_base64'}) { }
|
|
505
|
0 |
3 |
unless print $fh $expect->{'content'}
|
|
508
|
0 |
1 |
unless _copy_file($expect->{'content_from_file'}, $fh)
|
|
513
|
0 |
1 |
unless print $fh MIME::Base64::decode($expect->{'content_base64'})
|
|
524
|
1 |
23 |
if $expect->{'err'}
|
|
526
|
1 |
22 |
if $expect->{'ret_array'}
|