 Jue Jun 26, 2008 9:42 am
|
 |
teco000
Perlero Nuevo
|
Registrado: 29 May 2008
Mensajes: 32
Ubicación: Guatemala
|
|
| Mandar a imprimir a una función |
 |
|
Saludos, quisiera saber si me pueden ayudar, tengo una función x, a la cual le tengo que mandar diferentes nombres de archivos para que escriba en ellos. ¿Cómo lo puedo hacer ya que no me funciona lo siguiente?
| Perl: | sub imprimir ($a){
open ($a , ">>archivo.txt");
printf $a " $contenido";
}
imprimir (CASA );
imprimir (CARRO ); |
|
|
|
|
|
Jue Jun 26, 2008 12:29 pm
|
|
kidd
Creador de Perl en Español
|
Registrado: 15 Oct 2003
Mensajes: 1361
Ubicación: México
|
|
|
|
|
Hay unos errores de sintáxis. Te recomiendo que leas acerca de cómo crear tus funciones en Perl.
Básicamente el código que necesitarías es:
| Perl: | imprimir ("CASA");
imprimir ("CARRO");
sub imprimir {
my $contenido = shift;
open my $FILE, '>>', 'archivo.txt' or die $!;
print {$FILE} $contenido;
close $FILE;
} |
Saludos |
|
Powered by phpBB © 2001, 2005 phpBB Group
|
