| line | true | false | branch | 
 
| 38 | 0 | 23 | 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 |