| line |
true |
false |
branch |
|
68
|
2 |
2 |
if (exists $args->{'dlt'}) |
|
71
|
4 |
0 |
if (exists $args->{'output'}) { } |
|
138
|
3 |
1 |
if (my $startday = $args->{'startday'}) |
|
139
|
3 |
0 |
if ($startday =~ /^(\d{4})-?(\d{2})-?(\d{2})$/) |
|
158
|
2 |
9 |
$line =~ /$r_strt/ ? : |
|
163
|
2 |
0 |
$line =~ /$r_dscr/ ? : |
|
|
1 |
2 |
$line =~ /$r_empt/ ? : |
|
169
|
1 |
0 |
$line =~ /$r_empt/ ? : |
|
|
0 |
1 |
$line =~ /$r_stop/ ? : |
|
|
4 |
1 |
$line =~ /$r_dump/ ? : |
|
|
0 |
5 |
$line =~ /$r_mdsc/ ? : |
|
|
0 |
5 |
$line =~ /$r_dscr/ ? : |
|
178
|
0 |
0 |
$line =~ /$r_stop/ ? : |
|
|
3 |
0 |
$line =~ /$r_dscr/ ? : |
|
|
18 |
3 |
$line =~ /$r_dump/ ? : |
|
190
|
0 |
40 |
if ($self->{'debug'}) |
|
225
|
22 |
0 |
if ($len == 2 * hex($offset)) { } |
|
245
|
5 |
2 |
if (my $len = length $self->{'packet_bytes'}) |
|
246
|
1 |
4 |
if ($self->{'last_sec'} > $self->{'packet_secs'}) |