m/\s.*\((.*)$/; @fields = split(/,/, $1);