$data=~s/[\r\n]+/ /gs;
$data=~s/\s+/ /g;