| line |
l |
!l&&r |
!l&&!r |
condition |
|
48
|
0 |
2 |
0 |
$$self{'_reader'} ||= 'Data::Section::Simple'->new(ref $self) |
|
53
|
0 |
2 |
0 |
$$self{'_data_section_hash'} ||= $self->data_section->get_data_section |
|
75
|
0 |
2 |
0 |
$self->_cache->{$path} ||= do {
my $content = $self->get_data_section($path);
$content = decode_base64 $content if $content and $is_binary;
$content
} |
|
93
|
0 |
2 |
0 |
$$self{'last_modified'} ||= do {
my $mod = ref $self;
$mod =~ s[::][/]g;
$mod .= '.pm';
my $full_path = $INC{$mod};
my(@stat) = stat $full_path;
&HTTP::Date::time2str($stat[9])
} |
|
112
|
0 |
0 |
0 |
$base_dir->mkpath or $! != &Errno::EEXIST() |
|
123
|
0 |
0 |
0 |
$dir_path->mkpath or $! != &Errno::EEXIST() |