|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
51
 | 
 3  | 
 0  | 
 grep({&CORE::GLOBAL::caller() =~ /^$_\b/u;} @RAW_ACCESS) ? :  | 
 
| 
69
 | 
 0  | 
 0  | 
 $ppf ? :  | 
 
| 
96
 | 
 0  | 
 0  | 
 if $self->_opts->{'pretend'}  | 
 
| 
97
 | 
 0  | 
 0  | 
 if $self->_opts->{'interactive'}  | 
 
| 
104
 | 
 0  | 
 0  | 
 defined $line ? :  | 
 
| 
113
 | 
 0  | 
 0  | 
 if ($open_mode eq '<') { }  | 
 
| 
125
 | 
 0  | 
 0  | 
 if ($@)  | 
 
| 
127
 | 
 0  | 
 0  | 
 unless $@ =~ /^Can't open '$file' for reading:/u  | 
 
| 
185
 | 
 0  | 
 0  | 
 ref $inv ? :  | 
 
| 
192
 | 
 0  | 
 0  | 
 if $self->error  | 
 
| 
200
 | 
 0  | 
 0  | 
 unless ($self->_process_control_structure($control))  | 
 
| 
203
 | 
 0  | 
 0  | 
 unless $self->error  | 
 
| 
218
 | 
 0  | 
 0  | 
 if ($_ eq 'pidfile') { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($_ eq 'statusfile') { }  | 
 
| 
 | 
 0  | 
 0  | 
 elsif ($_ eq 'unless_clean_exit') { }  | 
 
| 
220
 | 
 0  | 
 0  | 
 unless $self->prep_pidfile($value)  | 
 
| 
227
 | 
 0  | 
 0  | 
 if ($self->update_statfile)  | 
 
| 
238
 | 
 0  | 
 0  | 
 unless (defined $self->statfile)  | 
 
| 
244
 | 
 0  | 
 0  | 
 if $self->error  | 
 
| 
245
 | 
 0  | 
 0  | 
 if ($lastrun)  | 
 
| 
248
 | 
 0  | 
 0  | 
 unless ($last_exit eq $CLEAN_EXIT)  | 
 
| 
258
 | 
 0  | 
 0  | 
 if (%$control) { }  | 
 
| 
290
 | 
 0  | 
 0  | 
 $command->can($optobj_method) ? :  | 
 
| 
310
 | 
 0  | 
 0  | 
 unless $self->_validate_value('arg', $def->{'type'}, $def->{'name'}, $arg)  | 
 
| 
324
 | 
 0  | 
 0  | 
 unless $self->_validate_value('opt', $def->{'type'}, $def->{'name'}, $opt)  | 
 
| 
326
 | 
 0  | 
 0  | 
 if $def->{'access_as_var'}  | 
 
| 
336
 | 
 0  | 
 0  | 
 if ($type->check($value)) { }  | 
 
| 
352
 | 
 0  | 
 0  | 
 unless $self->has_var('LOGFILE')  | 
 
| 
364
 | 
 0  | 
 0  | 
 if ($pidfile) { }  | 
 
| 
370
 | 
 0  | 
 0  | 
 if ($@ =~ /already running: (\d+)/u) { }  |