mknos / PerlPowerTools / 10301751009

73%

master: 62%

push

github

units: fail if custom unittab file doesn't open

* The old code unhelpfully bypassed opening the file specified by -f FILE option if it did not exist
* Make read_unittab() handle 3 cases...
* case1: implicit unittab ($file is undefined; read definitions in __DATA__)
* case2: $file is a directory (ignore it to match OpenBSD; read __DATA__)
* case3: otherwise... open the file and terminate the program if it couldn't open
* While here add defined() checks after prompting for input; this silences warnings seen when terminating program with ^D

* I found this when testing against the OpenBSD version

7 of 13 new or added lines in 1 file covered. (53.85%)

350 of 478 relevant lines covered (73.22%)

4746.76 hits per line