| line |
true |
false |
branch |
|
189
|
1 |
24 |
if scalar @{$self->_remaining_states;}
|
|
202
|
1 |
0 |
wantarray ? :
|
|
227
|
0 |
0 |
if $rv
|
|
426
|
0 |
1 |
if (ref $src) { }
|
|
430
|
0 |
1 |
unless open my $sh, '<', $src
|
|
437
|
1 |
0 |
if (ref $tgt) { }
|
|
441
|
0 |
0 |
unless open my $th, '<', $tgt
|
|
452
|
0 |
2 |
unless defined($r = sysread($src_h, $buf, $size))
|
|
454
|
1 |
1 |
unless $r
|
|
456
|
0 |
1 |
unless $t = syswrite($tgt_h, $buf, $r - $w, $w)
|
|
460
|
0 |
1 |
if $close_tgt
|
|
462
|
1 |
0 |
if $close_src
|
|
473
|
1 |
28 |
unless @{$self->_remaining_states;}
|
|
477
|
1 |
27 |
if $expect->{'cmd'} ne $cmd
|
|
479
|
20 |
7 |
if ($expect->{'args'})
|
|
480
|
1 |
19 |
unless ($cmp->Cmp($expect->{'args'}, $args))
|
|
487
|
6 |
20 |
if ($fh) { }
|
|
|
1 |
19 |
elsif ($expect->{'content'} or $expect->{'content_from_file'} or $expect->{'content_base64'}) { }
|
|
488
|
3 |
3 |
if (defined $expect->{'content'}) { }
|
|
|
1 |
2 |
elsif ($expect->{'content_from_file'}) { }
|
|
|
1 |
1 |
elsif ($expect->{'content_base64'}) { }
|
|
490
|
0 |
3 |
unless print $fh $expect->{'content'}
|
|
493
|
0 |
1 |
unless _copy_file($expect->{'content_from_file'}, $fh)
|
|
498
|
0 |
1 |
unless print $fh MIME::Base64::decode($expect->{'content_base64'})
|
|
509
|
1 |
23 |
if $expect->{'err'}
|
|
511
|
1 |
22 |
if $expect->{'ret_array'}
|