use 5.012;
use warnings;
use Crypt::OpenSSL::Random;
use MIME::Base64;

Crypt::OpenSSL::Random::random_seed("This is not a random seed");
my $random_bytes = Crypt::OpenSSL::Random::random_bytes(20);
say encode_base64($random_bytes);