只使用'base'包也是简单情况下的解决方案:

> s <- "a\nb\rc\r\nd"
> l <- strsplit(s,"\r\n|\n|\r")
> l  # the whole list...
[[1]]
[1] "a" "b" "c" "d"
> l[[1]][1] # ... or individual elements
[1] "a"
> l[[1]][2]
[1] "b"
> fun <- function(x) c('Line content:', x) # handle as you wish
> lapply(unlist(l), fun)

这个方法对我来说总是有效的:

$uniquepattern = "gd$#%@&~#" // Any set of characters which you don’t expect to be present in user input $_POST['text']. Better use at least 32 characters.
$textarray = explode($uniquepattern, str_replace("\r", "", str_replace("\n", $uniquepattern, $_POST['text'])));

PHP已经知道当前系统的换行符。只用EOL常数。

explode(PHP_EOL,$string)

您可以执行$string = nl2br($string)，以便将换行符更改为

<br />. 

这样，系统使用\r\n或\n或\r就无关紧要了

然后你可以把它输入一个数组:

$array = explode("<br />", $string);

你不需要preg_*函数、preg模式、str_replace within等，就可以通过换行成功地将字符串分解为数组。在所有场景中，无论是Linux、Mac还是Windows，这都可以。

<?php
    $array = explode(PHP_EOL, $string);
    // ...
    $string = implode(PHP_EOL, $array);
?>

PHP_EOL是一个常量，保存服务器平台使用的换行符。

大卫有一个伟大的方向，但它错过了\r。这招对我很管用:

$array = preg_split("/(\r\n|\n|\r)/", $string);