line |
true |
false |
branch |
98
|
0 |
0 |
unless defined $file |
99
|
0 |
0 |
unless -r $file |
105
|
0 |
0 |
wantarray ? : |
112
|
0 |
0 |
ref $content eq 'SCALAR' ? : |
127
|
0 |
0 |
if $@ |
128
|
0 |
0 |
if $repository |
134
|
0 |
0 |
if $error |
153
|
0 |
0 |
if $error |
167
|
0 |
0 |
if ($help) |
172
|
0 |
0 |
@ARGV ? : |
185
|
0 |
0 |
$silent ? : |
188
|
0 |
0 |
if (-d $path) { } |
|
0 |
0 |
elsif (-f $path) { } |
189
|
0 |
0 |
if (-d "$path/.git") { } |
|
0 |
0 |
elsif (6 == grep({-e "$path/$_";} 'branches', 'config', 'hooks', 'info', 'objects', 'refs')) { } |
206
|
0 |
0 |
unless -r $file |
207
|
0 |
0 |
unless -w _ |
209
|
0 |
0 |
unless (-s _) |
216
|
0 |
0 |
if ($content eq $original_content) { } |
222
|
0 |
0 |
unless $content =~ /\n$/ |
224
|
0 |
0 |
unless ($given{'always_yes'}) |
226
|
0 |
0 |
unless ($Y) |
231
|
0 |
0 |
unless ($given{'no_backup'}) |
240
|
0 |
0 |
wantarray ? : |
250
|
0 |
0 |
unless defined $file |
251
|
0 |
0 |
unless -r $file |
259
|
0 |
0 |
unless -e $to |
261
|
0 |
0 |
unless -d $to |
262
|
0 |
0 |
unless -w _ |
266
|
0 |
0 |
if ($template =~ /%fullpath\b/) |
272
|
0 |
0 |
if ($template =~ /%basename\b/) |
280
|
0 |
0 |
if ($template =~ /%date\b/) |
285
|
0 |
0 |
if ($template =~ /%time\b/) |
292
|
0 |
0 |
if ($template =~ /%tmp\b/) |
298
|
0 |
0 |
if ($template =~ /%sha1\b/) |
304
|
0 |
0 |
if ($tmp) { } |
309
|
0 |
0 |
unless $handle = $backup_file->openw |
318
|
0 |
0 |
unless $file_size == $backup_file_size |