| line |
true |
false |
branch |
|
73
|
0 |
103 |
unless $app->getopt(\@argv) |
|
81
|
11 |
0 |
@_ ? : |
|
82
|
0 |
11 |
/^[\da-f]{1,6}$/iu ? : |
|
96
|
241 |
353 |
if @pending == 0 and @_ == 0 |
|
97
|
57 |
108 |
if ($count == 0 and @out > 0 and $app->separate ne "") |
|
107
|
3 |
424 |
if ($arg =~ /^-x(?u)?$/u) |
|
110
|
1 |
2 |
$uni ? : |
|
114
|
4 |
420 |
if ($arg =~ /^-S$/u) |
|
119
|
30 |
390 |
if ($arg =~ /^-([cC])(.+)?$/u) |
|
120
|
22 |
8 |
$1 eq 'c' ? : |
|
121
|
20 |
10 |
defined $2 ? : |
|
126
|
9 |
381 |
if ($arg =~ /^-(F)(.+)?$/u) |
|
127
|
1 |
8 |
defined $2 ? : |
|
132
|
2 |
379 |
if ($arg =~ /^-(U)$/u) |
|
137
|
5 |
374 |
if ($arg =~ /^-E$/u) |
|
145
|
18 |
356 |
if ($arg =~ /^-([sia])(.+)?$/u) { } |
|
|
61 |
295 |
elsif ($arg =~ /^-f(.+)?$/u) { } |
|
149
|
0 |
18 |
if ($opt eq 's') { } |
|
152
|
12 |
6 |
if (@out == 0 or $opt eq 'i') { } |
|
164
|
0 |
61 |
defined $1 ? : |
|
178
|
135 |
250 |
if defined $_ |
|
179
|
32 |
81 |
if (/(\d+)\$/u) { } |
|
192
|
2 |
351 |
if ($arg =~ /^-u(.+)?$/u) { } |
|
201
|
350 |
1 |
if ($app->escape) |
|
216
|
188 |
165 |
if ($count) |
|
218
|
0 |
188 |
if $out > $count |
|
219
|
137 |
51 |
if $out == $count |
|
223
|
4 |
237 |
if $count and @out < $count |
|
224
|
217 |
20 |
if (wantarray) { } |