複数行のデータを空白行を削除してCSVにするソース

function _nl2csv($data)
{
	// 空白行の削除
	$str = ereg_replace("(\r|\n|\r\n)+", "\n", $data);
	// 改行 -> コンマの置換
	$str = ereg_replace("\n", ',', $str);
	// 最初の行がコンマなら削除
	if( substr($str, 0, 1) == ',') {
		$str = substr($str, 1, strlen($str) - 1);
	}
	// 最後の行がコンマなら削除
	if( substr($str, strlen($str) - 1, 1) == ',') {
		$str = substr($str, 0, strlen($str) - 1);
	}
	return $str;
}

ereg_replaceがイカス。