Foro - Perl en Español

cualquier cosa "otra cosa" el final.

Código: Seleccionar todo

my $salida="1.txt";
open (SALIDA,">$salida") || die "ERROR: No puedo abrir el fichero $salida\n";
print SALIDA "cualquier cosa "otra cosa" el final.";

Código: Seleccionar todo

print SALIDA 'cualquier cosa "otra cosa" el final.';   # no hay variables: lo ponemos como texto literal
print SALIDA q(cualquier cosa "otra cosa" el final.);  # idem, usando q()
print SALIDA "cualquier cosa \"otra cosa\" el final."; # si hubiera alguna variable, 'escapamos' el significado de las comillas internas
print SALIDA qq(cualquier cosa "otra cosa" el final.); # usando qq(), es como si pusieramos "...", pero... sin ponerlas