my (@title) = split(/\n/,$output);