use Storable qw( nfreeze thaw ); my $game_data = thaw (pack "H*" => $enc)->{game_data};