| blib/lib/Eliza/Chatbot/ScriptParser.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 19 | 22 | 86.3 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 18 | 8370 | if $line =~ /^[\s*#|\s*]$/ |
| 32 | 234 | 8136 | if (/quit|initial|final/) |
| 33 | 1386 | 6750 | if (/decomp/) |
| 34 | 0 | 1386 | unless $thiskey |
| 40 | 5130 | 1620 | if (/reasmb|reasmb_for_mempory/) |
| 41 | 0 | 5130 | unless $decomp |
| 48 | 522 | 1098 | if (/pre|post/) |
| 49 | 144 | 954 | if (/synon/) |
| 50 | 882 | 72 | if (/key/) |
| 79 | 6 | 18 | if ($script_file) { } |
| 81 | 0 | 6 | unless open my $fh, '<', $script_file |