VG
Size: a a a
VG
DE
AP
my $mask = $self->{mask}
|| (
MATH_RANDOM_SECURE
? Math::Random::Secure::irand(MAX_RAND_INT)
: int(rand(MAX_RAND_INT))
);
AP
DE
VG
VG
DE
AP
$ perl -E '$a="\x01\x02\x03\x04\x05"; $b="\x02\x01" x 3; say unpack "H*", $a ^ $b'
030301050701
AP
DE
AP
AP
VG
AP
AP
VG
VG
VO
AP