my %h = map { $_ => [ `zcat $_ | sed 's/[<> ]//g'` ] } glob("*.gz");
chomp @$_ for values %h;