my @firstwords = map { /^>(\w+)/ ? $1 : '#ERR#' } @segnames;