escalar con las líneas de gama

Question

¿Cómo puedo convertir un escalar que contiene una cadena con saltos de línea en una matriz con esas líneas como elementos?

Por ejemplo, teniendo en cuenta esto:

$lines = "line 1\nline 2\nline 3\n"; 

que desea recuperar este:

$lines[0] --> "line 1\n" 
$lines[1] --> "line 2\n" 
$lines[2] --> "line 3\n" 

Idealmente, me gustaría mantener la nueva línea en los elementos Aray.

Answer 1

Uso split:

my @lines = split(/\n/m, $lines); 

EDITAR: para mantener los saltos de línea, dividida en /^/m como se ha mencionado en los comentarios, o utilizar un ancho cero mirada detrás, como se ha mencionado en otra respuesta.

Answer 2

Una forma es utilizar split continuación map.

use warnings; 
use strict; 

my $lines = "line 1\nline 2\nline 3\n"; 
my @lines = map { "$_\n" } split /\n/, $lines; 

Answer 3

Puede utilizar un vistazo detrás negativo para preservar el carácter de nueva línea de fractura:

@lines = split /(?<=\n)/, $lines; 

Answer 4

Otra forma, sin split:

use warnings; 
use strict; 

my $lines = "line 1\nline 2\nline 3\n"; 
my @lines = $lines =~ /(.*\n)/g;