Esta solución es casi la misma que la de repetir el print(), pero escribiendo menos. Es la que utilizo yo:
Using perl Syntax Highlighting
print "Esta es una frase muy muy muy muy larga, como no me entra "
. "en una linea tengo que partirla en dos...";
Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
Esta otra es un poco rara, pero está bien si el texto es largo. Se trata de asignar el texto a la variable
$frase por medio de un fichero incluido en el propio código (
<<) y a continuación cambiamos (
s///) sus finales de línea (
\n) por un espacio en blanco. Al final, imprimimos la $frase:
Using perl Syntax Highlighting
($frase = <<EOF) =~ s/\n/ /g;
Esta es una frase muy muy muy muy larga, como no me entra
en una linea tengo que partirla en dos...
EOF
print $frase;
Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
Esto otra es quizás, la más clara. Se trata de considerar al texto como un vector (
()) de líneas y las imprimimos uniéndolas (
join) con un espacio:
Using perl Syntax Highlighting
print join ' ',(
'Esta es una frase muy muy muy muy larga, como no me entra',
'en una linea tengo que partirla en dos...',
);
Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
O si nos acordamos de poner un espacio en blanco al final de cada línea, luego las unimos sin más:
Using perl Syntax Highlighting
print join '',(
'Esta es una frase muy muy muy muy larga, como no me entra ',
'en una linea tengo que partirla en dos... ',
);
Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4