Branch Coverage

blib/lib/AI/MegaHAL.pm
Criterion Covered Total %
branch 6 22 27.2


line true false branch
37 0 0 if $constname eq 'constant'
38 0 0 @_ ? :
39 0 0 if ($! != 0)
40 0 0 if ($! =~ /Invalid/ or $!{'EINVAL'}) { }
51 0 0 if ($] >= 5.00561) { }
71 1 0 if (-e "$path/megahal.brn" or -e "$path/megahal.trn") { }
72 0 1 unless chdir $path
78 1 0 unless $args{'Banner'}
79 1 0 unless $args{'Wrap'}
80 1 0 unless $args{'Prompt'}
127 1 0 if $self->{'AutoSave'}