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") { } |
|
3 |
24 |
unless defined $_ |
|
3 |
0 |
print({$_[2];} $_) ? : |
|
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 $_ |
|
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 $_ |
|
0 |
0 |
unless defined $_ |
|
0 |
0 |
unless defined $_ |
110
|
0 |
5 |
if @huh |
138
|
0 |
0 |
unless /::rot(?:0|26)$/ |
153
|
0 |
0 |
unless /::rot(?:0|26)$/ |
155
|
0 |
0 |
print({$_[2];} $_[1]) ? : |