| line |
true |
false |
branch |
|
25
|
0 |
6 |
unless &getopts("b:c:d:f:ns", \%opt) |
|
29
|
3 |
3 |
if (defined $opt{'b'}) { } |
|
|
0 |
3 |
elsif (defined $opt{'c'}) { } |
|
|
3 |
0 |
elsif (defined $opt{'f'}) { } |
|
30
|
0 |
3 |
if $opt{'f'} |
|
34
|
0 |
0 |
if $opt{'f'} |
|
48
|
0 |
8 |
unless ($n =~ /\A\-?[0-9]+\Z/) |
|
52
|
0 |
8 |
if ($n == 0) |
|
66
|
6 |
0 |
if ($item =~ /\A([0-9]*)(\-?)([0-9]*)\z/) { } |
|
75
|
4 |
2 |
if length $from |
|
76
|
4 |
2 |
if length $to |
|
77
|
0 |
2 |
unless (length $from or length $to) |
|
81
|
2 |
4 |
if (length $from and length $to) |
|
82
|
0 |
2 |
if ($from > $to) |
|
86
|
0 |
2 |
if $from == $to |
|
88
|
4 |
2 |
if ($is_range) { } |
|
89
|
2 |
2 |
if (length $from and length $to) { } |
|
|
0 |
2 |
elsif (length $from) { } |
|
118
|
0 |
6 |
if $c <= $col |
|
122
|
0 |
3 |
if ($to_end) |
|
136
|
3 |
0 |
if (defined $delim) { } |
|
146
|
3 |
0 |
if (/$delim/) { } |
|
151
|
0 |
5 |
if $c <= $col |
|
155
|
0 |
3 |
if ($to_end) |
|
164
|
0 |
0 |
unless $sflag |