use DB_File;
use Hash::Util;
tie my %hash, "DB_File", $dict, O_RDONLY;
print bucket_stats_formatted(\%hash);
untie %hash;