| line |
true |
false |
branch |
|
36
|
256 |
260 |
unless length $_[0] == &bytes::length($_[0])
|
|
41
|
260 |
0 |
if (length $str < 8192) { }
|
|
52
|
0 |
0 |
if $_[0] =~ tr/\000-\377//c
|
|
57
|
0 |
0 |
if (length $str < 8192) { }
|
|
68
|
454 |
102 |
if length $_[0] != &bytes::length($_[0]) or $_[0] =~ tr/2-7A-Za-z/\000-18-@[-`{-\377/c
|
|
72
|
102 |
0 |
if (length $_[0] < 8192) { }
|
|
80
|
6 |
96 |
unless $padding < 5
|
|
82
|
20 |
76 |
unless $str =~ s/0{$padding}\z//
|
|
90
|
0 |
0 |
if $_[0] =~ tr/2-7A-Za-z/\000-18-@[-`{-\377/c
|
|
94
|
0 |
0 |
if (length $_[0] < 8192) { }
|
|
102
|
0 |
0 |
unless $padding < 5
|
|
104
|
0 |
0 |
unless $str =~ s/0{$padding}\z//
|