Branch Coverage

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


line true false branch
36 0 0 unless ($@)
53 0 0 unless open my $fh, '+<', $0
63 0 0 unless seek $fh, 0, 0
64 0 0 unless print $fh @file
65 0 0 unless truncate $fh, tell $fh
84 0 0 unless $$file_array_ref[$line_id] =~ /App::Rad->run/
94 0 0 if (not $changed)
157 0 0 if (@args < 3)
166 0 0 if (not $args[0] =~ /^-/o) { }
171 0 0 if ($c->is_command($command_name))