line |
true |
false |
branch |
143
|
13 |
0 |
if /^Mimetic\z/so and ($dev, $ino, $mode, $nlink, $uid, $gid) = lstat $_ and -d _ |
155
|
0 |
15 |
unless /^.*\.pm\z/so and ($dev, $ino, $mode, $nlink, $uid, $gid) = lstat $_ and -f _ |
177
|
0 |
0 |
unless $prompt |
199
|
0 |
0 |
if $passwd eq '' |
201
|
0 |
0 |
if $passwd eq $confirm |
211
|
2 |
3 |
if $@ |
359
|
0 |
0 |
unless open FH, "$mimetic_file" |
391
|
0 |
0 |
unless open FH, "$mimetic_file" |
413
|
0 |
0 |
unless open IN, "$mimetic_file" |
414
|
0 |
0 |
unless open OUT, ">$mask_file" |
439
|
0 |
0 |
unless open OF, ">$destination_file" |
444
|
0 |
0 |
unless copy($mask_file, $destination_file) |
446
|
0 |
0 |
unless $key or not $passwd_needed |
450
|
0 |
0 |
unless open OF, ">>$destination_file" |
471
|
0 |
0 |
unless $algorithm |
474
|
0 |
0 |
unless $key or not $passwd_needed |
477
|
0 |
0 |
if $Mimetic ne 'Mimetic' |
499
|
0 |
0 |
if ($argc == 1) { } |
|
0 |
0 |
elsif ($argc == 3) { } |
|
0 |
0 |
elsif ($argc == 4) { } |
521
|
0 |
0 |
if $err < 1 |