| bin/cat | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 32 | 50.0 |
| line | true | false | branch |
|---|---|---|---|
| 26 | 0 | 1 | unless (&getopts("benstuv", \%opt)) |
| 38 | 5 | 1 | unless $_ |
| 39 | 1 | 0 | $cook ? : |
| 42 | 0 | 1 | if $opt{'u'} |
| 47 | 0 | 1 | if (scalar @ARGV == 0) |
| 54 | 0 | 1 | $err ? : |
| 65 | 0 | 1 | if ($name eq '-') { } |
| 68 | 0 | 1 | if (-d $name) |
| 72 | 0 | 1 | unless (open $fh, "<", $name) |
| 79 | 0 | 1 | if ($name ne "-" and not close $fh) |
| 99 | 0 | 1 | if ($squeeze_empty) |
| 101 | 0 | 0 | if ($is_empty and $was_empty) |
| 107 | 0 | 1 | if $ends |
| 108 | 0 | 1 | if ($nonprinting) |
| 113 | 0 | 1 | if ($tabs) |
| 117 | 1 | 0 | if ($number_lines or $number_non_blanks and /\S/) |