| line |
true |
false |
branch |
|
62
|
0 |
2 |
ref $_[0] ? :
|
|
63
|
1 |
1 |
unless @_
|
|
69
|
0 |
1 |
unless ("PPI::Document"->set_cache($cache))
|
|
118
|
0 |
2 |
unless my $path = $params{'path'}
|
|
119
|
0 |
2 |
unless (-d $path)
|
|
122
|
0 |
2 |
unless (-r $path and -x $path)
|
|
125
|
0 |
2 |
unless ($params{'readonly'} or -w $path)
|
|
177
|
5 |
0 |
ref $_[0] ? :
|
|
180
|
0 |
5 |
unless my $md5hex = $self->_md5hex(shift())
|
|
199
|
0 |
2 |
unless my $Document = &_INSTANCE(shift(), "PPI::Document")
|
|
202
|
0 |
2 |
if $self->readonly
|
|
205
|
0 |
2 |
unless my $md5hex = $Document->hex_id
|
|
225
|
3 |
0 |
unless -d $dir
|
|
240
|
1 |
5 |
unless -f $file
|
|
246
|
0 |
5 |
unless (&_INSTANCE($object, "PPI::Document"))
|
|
266
|
6 |
3 |
&_SCALAR($_[0]) ? :
|
|
268
|
9 |
0 |
defined $it && !ref($it) && $it =~ /^[[:xdigit:]]{32}\z/s ? :
|