| line |
true |
false |
branch |
|
21
|
0 |
0 |
unless (-e $file and -r _) |
|
26
|
0 |
0 |
if (not rename($file, "$file.xbak")) { } |
|
30
|
0 |
0 |
if (not open($CHANGED, '>', $file) && open($ORIG, '<', "$file.xbak")) { } |
|
32
|
0 |
0 |
unless (rename "$file.xbak", $file) |
|
38
|
0 |
0 |
if (substr($_, 0, 7) eq '%%Title') |
|
44
|
0 |
0 |
if $. > 5 |
|
51
|
0 |
0 |
unless defined($r = read($ORIG, $buf, $chunk)) |
|
53
|
0 |
0 |
if $r == 0 |
|
54
|
0 |
0 |
unless print {$CHANGED;} $buf |
|
61
|
0 |
0 |
if (-e "$file.xbak") |
|
62
|
0 |
0 |
unless unlink "$file.xbak" |
|
73
|
0 |
0 |
unless (-e $file and -r _) |
|
74
|
0 |
0 |
if $log |
|
77
|
0 |
0 |
if $log |
|
78
|
0 |
0 |
if (not rename($file, "$file.bak")) { } |
|
79
|
0 |
0 |
if $log |
|
82
|
0 |
0 |
if (not open($STAMPED, '>', $file) && open($ORIG, '<', "$file.bak")) { } |
|
83
|
0 |
0 |
if $log |
|
84
|
0 |
0 |
if (not rename("$file.bak", $file) and $log) |
|
90
|
0 |
0 |
if /^%%Page:\s+-?\d+\s+1\s*$/ |
|
93
|
0 |
0 |
if (substr($_, 0, 2) ne '%%') |
|
94
|
0 |
0 |
if $log |
|
100
|
0 |
0 |
if ($$stampref[1]) { } |
|
133
|
0 |
0 |
unless defined($r = read($ORIG, $buf, $chunk)) |
|
135
|
0 |
0 |
if $r == 0 |
|
136
|
0 |
0 |
unless print {$STAMPED;} $buf |
|
139
|
0 |
0 |
if $log |
|
144
|
0 |
0 |
if -e "$file.bak" |