print map "$_\n", split /\0/, @dbm{sort keys %dbm};