Foros del Web - Ver Mensaje Individual

monoswim · 14-jul-2004, 08:26

Tema: funciones y subrutinas
Pregunta: Como pasar parámetros por referencia?
Respuesta: En perl podemos pasar cualquier variable por referencia, ahorrando la memoria utilizada y haciendo más rápido el script.

Código:

my $variable = "hola gente";
&imprimir(\$variable);
exit;

sub imprimir(){
     my $ref = $_[0];
     print "content-type: text/html \n\n";
     print "$$ref";
}

De esta manera pasamos la dirección de memoria en donde está la variable, y cuando la usamos en la subrutina estamos usando la variable original.

14-jul-2004, 08:26	#22 (permalink)
monoswim $moderador{'Esteban'} Fecha de Ingreso: noviembre-2002 Ubicación: Buenos Aires - Argentina Mensajes: 7.330	Tema: funciones y subrutinas Pregunta: Como pasar parámetros por referencia? Respuesta: En perl podemos pasar cualquier variable por referencia, ahorrando la memoria utilizada y haciendo más rápido el script. Código: my $variable = "hola gente"; &imprimir(\$variable); exit; sub imprimir(){ my $ref = $_[0]; print "content-type: text/html \n\n"; print "$$ref"; } De esta manera pasamos la dirección de memoria en donde está la variable, y cuando la usamos en la subrutina estamos usando la variable original. __________________ MonoSwim Antes era fanfarrón y canchero, ahora soy perfecto !!!!!!! Última edición por monoswim; 20-jul-2004 a las 07:35.