|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
105
 | 
 0  | 
 9  | 
 unless (-d $self->gitdir)
  | 
 
| 
108
 | 
 0  | 
 9  | 
 unless (not defined $self->directory or -d $self->directory)
  | 
 
| 
124
 | 
 3  | 
 3  | 
 unless $filename =~ /\.pack$/
  | 
 
| 
135
 | 
 0  | 
 5  | 
 if (-d $file) { }
  | 
 
| 
150
 | 
 11  | 
 22  | 
 unless -d $dir
  | 
 
| 
155
 | 
 6  | 
 5  | 
 if (-f $packed_refs)
  | 
 
| 
157
 | 
 6  | 
 6  | 
 if $line =~ /^#/
  | 
 
| 
158
 | 
 0  | 
 6  | 
 if $line =~ /^\^/
  | 
 
| 
179
 | 
 0  | 
 30  | 
 unless -d $dir
  | 
 
| 
181
 | 
 0  | 
 30  | 
 if ($wantref eq 'HEAD')
  | 
 
| 
191
 | 
 16  | 
 0  | 
 if ($ref eq $wantref)
  | 
 
| 
200
 | 
 14  | 
 0  | 
 if (-f $packed_refs)
  | 
 
| 
204
 | 
 14  | 
 14  | 
 if $line =~ /^#/
  | 
 
| 
209
 | 
 0  | 
 0  | 
 if $last_name and $last_name eq $wantref and $name ne $wantref
  | 
 
| 
214
 | 
 14  | 
 0  | 
 if $last_name eq $wantref
  | 
 
| 
221
 | 
 0  | 
 30  | 
 if $sha1 =~ /^ref: (.*)/
  | 
 
| 
252
 | 
 3  | 
 866  | 
 unless $sha1
  | 
 
| 
266
 | 
 798  | 
 0  | 
 if (defined $kind and defined $size and defined $content)
  | 
 
| 
276
 | 
 68  | 
 0  | 
 if (defined $kind and defined $size and defined $content)
  | 
 
| 
283
 | 
 155  | 
 711  | 
 if ($kind eq 'commit') { }
  | 
 
| 
 | 
 403  | 
 308  | 
 elsif ($kind eq 'tree') { }
  | 
 
| 
 | 
 308  | 
 0  | 
 elsif ($kind eq 'blob') { }
  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($kind eq 'tag') { }
  | 
 
| 
347
 | 
 4  | 
 10  | 
 if ($object->kind eq 'commit')
  | 
 
| 
348
 | 
 4  | 
 0  | 
 unless $ref
  | 
 
| 
358
 | 
 0  | 
 5  | 
 unless $ref_fh->print($sha1)
  | 
 
| 
363
 | 
 0  | 
 5  | 
 unless $head_fh->print("ref: refs/heads/$refname")
  | 
 
| 
373
 | 
 1  | 
 2  | 
 if (not defined $directory) { }
  | 
 
| 
378
 | 
 2  | 
 0  | 
 unless (defined $arguments{'gitdir'})
  | 
 
| 
391
 | 
 2  | 
 1  | 
 defined $directory ? :
  | 
 
| 
432
 | 
 0  | 
 4  | 
 unless $tree
  | 
 
| 
438
 | 
 5  | 
 0  | 
 if ($object->kind eq 'blob') { }
  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($object->kind eq 'tree') { }
  | 
 
| 
440
 | 
 0  | 
 5  | 
 unless chmod oct '0' . $mode, $filename
  | 
 
| 
455
 | 
 1  | 
 0  | 
 if (@_ == 2) { }
  | 
 
| 
458
 | 
 0  | 
 1  | 
 unless $_[1] =~ m[^/]
  | 
 
| 
487
 | 
 0  | 
 39  | 
 unless $fh->print($contents)
  | 
 
| 
488
 | 
 0  | 
 39  | 
 unless $fh->close
  |