my $ret = encode_base64( $Hash->( pack "aL", $old_mix, $old_rand ) );