| line |
true |
false |
branch |
|
95
|
7 |
173 |
if ($token_type == 89 and {-A => 1, -B => 1, -C => 1, -M => 1, -O => 1, -R => 1, -S => 1, -T => 1, -W => 1, -X => 1, -b => 1, -c => 1, -d => 1, -e => 1, -f => 1, -g => 1, -k => 1, -l => 1, -o => 1, -p => 1, -r => 1, -s => 1, -u => 1, -w => 1, -x => 1, -z => 1}->{$token_data}) { } |
|
|
18 |
155 |
elsif ($token_type == 70 and {abs => 1, alarm => 1, chomp => 1, chop => 1, chr => 1, chroot => 1, cos => 1, defined => 1, eval => 1, exp => 1, glob => 1, hex => 1, int => 1, lc => 1, lcfirst => 1, length => 1, log => 1, lstat => 1, mkdir => 1, oct => 1, ord => 1, pos => 1, print => 1, quotemeta => 1, readlink => 1, readpipe => 1, ref => 1, require => 1, reverse => 1, rmdir => 1, sin => 1, split => 1, sqrt => 1, stat => 1, study => 1, uc => 1, ucfirst => 1, unlink => 1, unpack => 1}->{$token_data}) { } |
|
97
|
7 |
0 |
if ($token->{'type'} == 137 and $token->{'data'} eq '$_') |
|
110
|
3 |
15 |
if ($function_name eq 'reverse') |
|
112
|
2 |
1 |
if ($$tokens[$i - 1]{'type'} == 65 and $two_before_token_type == 168 || $two_before_token_type == 192 || $two_before_token_type == 195) |
|
124
|
4 |
12 |
$function_name eq 'split' ? : |
|
129
|
7 |
9 |
if ($token->{'type'} == 107) { } |
|
133
|
0 |
26 |
if ($token_type == 107) { } |
|
|
7 |
19 |
elsif ($token_type == 108) { } |
|
137
|
7 |
0 |
if (--$left_paren_num <= 0) |
|
139
|
5 |
1 |
if ($$tokens[$i - 2]{'kind'} != 1 and $previous_token->{'type'} == 137 and $previous_token->{'data'} eq '$_') |
|
160
|
9 |
21 |
if ($token_type == 106) |
|
162
|
6 |
2 |
if ($$tokens[$i - 2]{'kind'} != 1 and $previous_token->{'type'} == 137 and $previous_token->{'data'} eq '$_') |