| line |
true |
false |
branch |
|
40
|
0 |
477 |
unless @_ <= 2
|
|
|
0 |
477 |
unless @_ >= 2
|
|
41
|
1 |
476 |
if ($index > $#op_codes or $index < 0)
|
|
49
|
0 |
127 |
unless @_ <= 2
|
|
|
0 |
127 |
unless @_ >= 1
|
|
|
80 |
47 |
@_ >= 2 ? :
|
|
56
|
0 |
80 |
unless @_ <= 1
|
|
|
0 |
80 |
unless @_ >= 1
|
|
60
|
0 |
184 |
unless @_ <= 1
|
|
|
0 |
184 |
unless @_ >= 1
|
|
70
|
0 |
1 |
unless @_ <= 1
|
|
|
0 |
1 |
unless @_ >= 1
|
|
74
|
2 |
2 |
unless $x
|
|
86
|
0 |
1 |
if $self->debug
|
|
89
|
0 |
1 |
if ("${ip}:$port" eq '0.0.0.0:0') { }
|
|
93
|
0 |
1 |
if (my $sock = 'IO::Socket::INET'->new("${ip}:$port")) { }
|
|
118
|
0 |
18 |
unless @_ <= 1
|
|
|
0 |
18 |
unless @_ >= 1
|
|
119
|
18 |
0 |
if (my $io = $self->socket || $self->stdout) { }
|
|
131
|
0 |
0 |
unless @_ <= 1
|
|
|
0 |
0 |
unless @_ >= 1
|
|
134
|
0 |
0 |
if (my $io = $self->socket || $self->stdin) { }
|
|
148
|
0 |
44 |
unless @_ <= 1
|
|
|
0 |
44 |
unless @_ >= 1
|
|
149
|
43 |
1 |
if ($self->_get_current_mem) { }
|
|
161
|
0 |
3 |
if $self->_current_op == $IF
|
|
163
|
0 |
3 |
if ($self->_current_op == $EIF)
|
|
164
|
0 |
0 |
if ($nest_level) { }
|
|
172
|
1 |
2 |
unless $max_iterations
|
|
179
|
0 |
43 |
unless @_ <= 1
|
|
|
0 |
43 |
unless @_ >= 1
|
|
180
|
6 |
37 |
if (not $self->_get_current_mem) { }
|