|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
38
 | 
 0  | 
 21  | 
 if @_  | 
 
| 
73
 | 
 2  | 
 0  | 
 unless -d $tree_dir  | 
 
| 
92
 | 
 0  | 
 2  | 
 if $self->{'v'}  | 
 
| 
95
 | 
 0  | 
 2  | 
 $^O eq 'VMS' ? :  | 
 
| 
97
 | 
 0  | 
 2  | 
 $source_dir eq $ddir ? :  | 
 
| 
100
 | 
 0  | 
 2  | 
 if (not $ok and -d $source_dir)  | 
 
| 
102
 | 
 0  | 
 0  | 
 unless (chdir $source_dir)  | 
 
| 
113
 | 
 0  | 
 0  | 
 if $self->{'v'} > 1  | 
 
| 
116
 | 
 0  | 
 0  | 
 unless chdir $cwd  | 
 
| 
120
 | 
 0  | 
 2  | 
 unless $ok  | 
 
| 
121
 | 
 0  | 
 2  | 
 if $self->{'v'}  | 
 
| 
142
 | 
 7  | 
 9  | 
 if (open DOTPATCH, "< $dot_patch")  | 
 
| 
149
 | 
 7  | 
 0  | 
 if ($patch_level)  | 
 
| 
167
 | 
 9  | 
 0  | 
 if (open PATCHLEVEL_H, "< $patchlevel_h")  | 
 
| 
171
 | 
 1336  | 
 9  | 
 unless $declaration_seen and /^\s+,"(?:DEVEL|MAINT)(\d+)|(RC\d+)"/  | 
 
| 
173
 | 
 0  | 
 9  | 
 if ($patch_level =~ /^RC/) { }  | 
 
| 
185
 | 
 9  | 
 0  | 
 if ($patch_level and not $patch_level =~ /-RC\d+$/) { }  | 
 
| 
186
 | 
 9  | 
 0  | 
 if (open DOTPATCH, "> $dot_patch")  | 
 
| 
225
 | 
 0  | 
 1  | 
 unless ($gitbin)  | 
 
| 
240
 | 
 0  | 
 1  | 
 $out eq 'true' ? :  | 
 
| 
276
 | 
 5  | 
 0  | 
 'File::Spec'->file_name_is_absolute($clean_dir) ? :  | 
 
| 
286
 | 
 10  | 
 30  | 
 unless -f $_  | 
 
| 
293
 | 
 10  | 
 31  | 
 unless -f $_  | 
 
| 
295
 | 
 30  | 
 1  | 
 if exists $orig_dir{$file}  | 
 
| 
297
 | 
 0  | 
 1  | 
 -e $_ ? :  | 
 
| 
309
 | 
 15  | 
 0  | 
 unless $^O eq "VMS"  | 
 
| 
326
 | 
 14  | 
 0  | 
 unless $^O eq "VMS"  | 
 
| 
330
 | 
 0  | 
 0  | 
 unless $logical  |