Branch Coverage

blib/lib/App/Rad/Include.pm
Criterion Covered Total %
branch 0 24 0.0


line true false branch
17 0 0 if (/^cmd(\d+)$/)
18 0 0 if $1 > $id
48 0 0 unless ($@)
65 0 0 unless open my $fh, '+<', $0
75 0 0 unless seek $fh, 0, 0
76 0 0 unless print $fh @file
77 0 0 unless truncate $fh, tell $fh
96 0 0 unless $file_array_ref->[$line_id] =~ /App::Rad->run/
106 0 0 if (not $changed)
169 0 0 if (@args < 3)
178 0 0 if (not $args[0] =~ /^-/o) { }
183 0 0 if ($c->is_command($command_name))