| line |
true |
false |
branch |
|
53
|
1 |
4 |
if @_ == 1 and $_[0] eq ':all' |
|
54
|
3 |
2 |
unless @_ |
|
62
|
0 |
33 |
if not /^[0-9]+$/ or $_ < 0 or $_ > 26 |
|
67
|
0 |
33 |
if $INC{$module} |
|
78
|
31 |
2 |
if (my $encode = $rotate[$_] . uc($rotate[$_])) |
|
99
|
33 |
0 |
if (eval "$source; 1") { } |
|
|
2 |
16 |
unless defined $_ |
|
|
3 |
8 |
print({$_[2];} $_) ? : |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
1 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
1 |
8 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
|
0 |
0 |
unless defined $_ |
|
110
|
0 |
5 |
if @huh |
|
138
|
1 |
0 |
unless /::rot(?:0|26)$/ |
|
153
|
0 |
0 |
unless /::rot(?:0|26)$/ |
|
155
|
0 |
0 |
print({$_[2];} $_[1]) ? : |