line |
true |
false |
branch |
31
|
10 |
0 |
if $k0 eq $k1 |
38
|
0 |
5 |
if $self->opt('kvp') |
40
|
0 |
5 |
if $self->{'host'} =~ /(.+?)\./ |
41
|
2 |
3 |
if (my $mask = $self->opt('host_sans')) |
42
|
2 |
0 |
if $self->{'host'} =~ /(.+?)$mask$/ |
45
|
0 |
5 |
if (my $pf = $self->opt('perlf')) |
46
|
0 |
0 |
unless -e $pf |
49
|
2 |
3 |
if $self->{'perlcode'} ne '' |
50
|
2 |
3 |
if ($self->opt('order')) { } |
54
|
2 |
0 |
unless $self->opt('no_date') or $self->opt('no_time') or $self->opt('no_human_date') |
55
|
2 |
0 |
unless $self->opt('no_date') or $self->opt('no_time') or $self->opt('no_epoch') |
56
|
0 |
3 |
if $self->opt('host') or $self->opt('host_sans') |
57
|
1 |
2 |
if $self->opt('with') |
58
|
0 |
3 |
if $self->opt('perl') or $self->opt('perlf') |
63
|
2 |
3 |
if (my $tai = $self->opt('tai')) |
65
|
2 |
0 |
if $tai eq '35' |
66
|
0 |
2 |
if $tai eq '0' |
75
|
0 |
3 |
if $self->opt('pretee') |
78
|
1 |
2 |
if $self->{'perlcode'} ne '' |
80
|
2 |
1 |
unless $self->opt('no_date') or $self->opt('no_epoch') |
81
|
2 |
1 |
unless $self->opt('no_date') or $self->opt('no_human_date') |
82
|
1 |
2 |
if $self->opt('host') or $self->opt('host_sans') |
83
|
1 |
2 |
if $self->opt('with') |
84
|
1 |
2 |
if $self->opt('perl') or $self->opt('perlf') |
86
|
0 |
3 |
$self->opt('no_space') ? : |
88
|
0 |
9 |
unless defined $hr->{$k} |
90
|
0 |
9 |
if ($self->{'format'} eq 'kvp') { } |
|
0 |
9 |
elsif ($self->{'format'} eq 'csv') { } |
|
0 |
9 |
elsif ($self->{'format'} eq 'tab') { } |
103
|
3 |
0 |
if $pad |
104
|
0 |
3 |
if $self->opt('tee') |
110
|
0 |
0 |
unless defined $tm |
114
|
0 |
0 |
if $self->opt('hires') or $self->opt('tai') |
121
|
2 |
2 |
if defined $self->{'tai_or'} |
122
|
0 |
4 |
if $self->opt('hires') |
123
|
2 |
2 |
unless $tm |
124
|
2 |
2 |
if ($tm =~ /\.\d+/) |
125
|
2 |
0 |
if (length $tm >= 15) { } |
136
|
2 |
0 |
unless defined $tm |
137
|
0 |
2 |
if $self->opt('iso') |
139
|
0 |
2 |
if $self->opt('short') |
140
|
0 |
2 |
if $self->opt('shorter') |
150
|
32 |
275 |
if defined $v |