| line |
true |
false |
branch |
|
27
|
0 |
1 |
if ($path_info =~ m[/$]) |
|
|
0 |
0 |
if ($path_info =~ m[/$]) |
|
31
|
0 |
1 |
if $par{'debug'} |
|
|
0 |
0 |
if $par{'debug'} |
|
57
|
0 |
1 |
if $$self{'debug'} |
|
|
0 |
0 |
if $$self{'debug'} |
|
67
|
1 |
0 |
if (-f $filename and -r $filename) { } |
|
|
0 |
0 |
if (-f $filename and -r $filename) { } |
|
68
|
0 |
0 |
unless ($self->process) |
|
|
0 |
0 |
unless ($self->process) |
|
83
|
0 |
1 |
if $$self{'debug'} |
|
|
0 |
0 |
if $$self{'debug'} |
|
84
|
0 |
0 |
unless $self->preprocess |
|
|
0 |
0 |
unless $self->preprocess |
|
86
|
0 |
0 |
if $$self{'debug'} |
|
|
0 |
0 |
if $$self{'debug'} |
|
87
|
0 |
0 |
unless $self->compile |
|
|
0 |
0 |
unless $self->compile |
|
89
|
0 |
0 |
if $$self{'debug'} |
|
|
0 |
0 |
if $$self{'debug'} |
|
90
|
0 |
0 |
unless $self->execute |
|
|
0 |
0 |
unless $self->execute |
|
98
|
0 |
1 |
if ($self->file_cache_ok) |
|
|
0 |
0 |
if ($self->file_cache_ok) |
|
143
|
0 |
0 |
unless ($CIPP->Get_Init_Status) |
|
|
0 |
0 |
unless ($CIPP->Get_Init_Status) |
|
150
|
0 |
0 |
unless ($CIPP->Get_Preprocess_Status) |
|
|
0 |
0 |
unless ($CIPP->Get_Preprocess_Status) |
|
178
|
0 |
0 |
unless ($error =~ /syntax OK/) |
|
|
0 |
0 |
unless ($error =~ /syntax OK/) |
|
179
|
0 |
0 |
if $error |
|
|
0 |
0 |
if $error |
|
197
|
0 |
0 |
if (defined $href) |
|
|
0 |
0 |
if (defined $href) |
|
210
|
0 |
0 |
if $self->sub_cache_ok |
|
|
0 |
0 |
if $self->sub_cache_ok |
|
227
|
0 |
0 |
if ($@) |
|
|
0 |
0 |
if ($@) |
|
246
|
0 |
0 |
if ($CGI::CIPP::mime_type{$sub_name} ne 'cipp/dynamic') |
|
|
0 |
0 |
if ($CGI::CIPP::mime_type{$sub_name} ne 'cipp/dynamic') |
|
261
|
0 |
0 |
if ($@) |
|
|
0 |
0 |
if ($@) |
|
280
|
0 |
0 |
if ($type eq 'cipp-syntax') { } |
|
|
0 |
0 |
if ($type eq 'cipp-syntax') { } |
|
297
|
0 |
0 |
if ($$self{'cipp_debug_text'}) |
|
|
0 |
0 |
if ($$self{'cipp_debug_text'}) |
|
319
|
0 |
0 |
if $$self{'debug'} |
|
|
0 |
0 |
if $$self{'debug'} |
|
337
|
0 |
1 |
unless -d $dir |
|
|
0 |
0 |
unless -d $dir |
|
364
|
0 |
0 |
if (-e $cache_file) { } |
|
|
0 |
1 |
if (-e $cache_file) { } |
|
374
|
0 |
0 |
if $file_time > $cache_time |
|
|
0 |
0 |
if $file_time > $cache_time |
|
378
|
0 |
0 |
unless -d $$self{'cache_dir'} |
|
|
0 |
1 |
unless -d $$self{'cache_dir'} |
|
398
|
0 |
0 |
if (not defined $sub_time or $cache_time > $sub_time) |
|
|
0 |
0 |
if (not defined $sub_time or $cache_time > $sub_time) |
|
415
|
0 |
0 |
if (-e $err_filename) |
|
|
0 |
0 |
if (-e $err_filename) |
|
433
|
1 |
0 |
if ($uri =~ m[^/]) { } |
|
|
0 |
0 |
if ($uri =~ m[^/]) { } |
|
441
|
0 |
1 |
if $$self{'debug'} |
|
|
0 |
0 |
if $$self{'debug'} |
|
452
|
0 |
0 |
if (not ref $data) { } |
|
|
0 |
0 |
if (not ref $data) { } |
|
460
|
0 |
0 |
unless open $fh, "+> $filename" |
|
|
0 |
0 |
unless open $fh, "+> $filename" |
|
462
|
0 |
0 |
unless flock $fh, 2 |
|
|
0 |
0 |
unless flock $fh, 2 |
|
463
|
0 |
0 |
unless seek $fh, 0, 0 |
|
|
0 |
0 |
unless seek $fh, 0, 0 |
|
464
|
0 |
0 |
unless print $fh $$data_sref |
|
|
0 |
0 |
unless print $fh $$data_sref |
|
465
|
0 |
0 |
unless truncate $fh, length $$data_sref |
|
|
0 |
0 |
unless truncate $fh, length $$data_sref |
|
475
|
0 |
0 |
unless open $fh, $filename |
|
|
0 |
0 |
unless open $fh, $filename |
|
477
|
0 |
0 |
unless flock $fh, 1 |
|
|
0 |
0 |
unless flock $fh, 1 |
|
495
|
0 |
0 |
if ($par =~ /^db_([^_]+)_(.*)/) |
|
|
0 |
0 |
if ($par =~ /^db_([^_]+)_(.*)/) |
|
538
|
0 |
0 |
if (defined $$self{'header_out'}) |
|
|
0 |
0 |
if (defined $$self{'header_out'}) |