++$h{$_} for map { chomp; s/[<> ]//g; $_ } `zcat @{[glob '*.gz']}`;