map {$fields{$_}++} @fields;