$rsa->use_no_padding;

my $in = join '', 'a' .. 'z';
my $buf = pack 'Ca39', 0x1, $in;
my $cipher = $rsa->encrypt($buf);

my $plain = $rsa->decrypt($cipher);
print unpack 'xZ39', $plain;