Branch Coverage

lib/IPC/Transit/Internal.pm
Criterion Covered Total %
branch 0 32 0.0


line true false branch
18 0 0 unless ($queue_cache->{$qid})
19 0 0 unless $queue_cache->{$qid} = 'IPC::Msg'->new($qid, _get_flags('create_ipc'))
29 0 0 if $queue_cache->{$qid}
72 0 0 if (sysopen $fh, $lock_file, _get_flags('exclusive_lock'))
78 0 0 if (not $have_lock)
88 0 0 unless unlink $lock_file
93 0 0 unless $IPC::Transit::Internal::config->{'queues'}
96 0 0 unless open my $fh, '<', $filename
103 0 0 unless $info->{'qid'}
104 0 0 unless $info->{'qname'}
122 0 0 if $IPC::Transit::Internal::config->{'queues'} and $IPC::Transit::Internal::config->{'queues'}{$qname}
127 0 0 if $IPC::Transit::Internal::config->{'queues'} and $IPC::Transit::Internal::config->{'queues'}{$qname}
137 0 0 if ($IPC::Transit::Internal::config->{'queues'} and $IPC::Transit::Internal::config->{'queues'}{$qname})
144 0 0 unless open my $fh, '>', $file
152 0 0 if ($@)
160 0 0 unless -d _get_transit_config_dir()