Tecnología

Inicio

Cómo pasar parámetros a subrutinas en Perl

A diferencia de muchos otros lenguajes de programación, cuando se escribe el código de subrutinas en Perl, no se incluye una lista de los parámetros que acepta la función. Sin embargo, si se conoce la función recibirá uno o más parámetros, usted todavía tiene que programar la subrutina para usarlos. Los parámetros pasados ​​a una subrutina Perl se almacenan en la matriz "@_", que es una matriz de lista especial. Básicamente, esto significa que cada subrutina se crea puede aceptar cualquier número de parámetros, pero la cantidad que necesita y cómo se utilicen se determina por el código de la subrutina.

Instrucciones

1 Abrir un archivo de programa Perl. Escriba el siguiente código:

línea de sub {

$ Var = @_ [0];

}

Esta subrutina utiliza la matriz "@_" para obtener los parámetros, pero sólo hace uso de la primera. Las llamadas a cualquiera "línea ( '¡Hola!');" o "línea (" Hola "," ¿Cómo estás? '); " tanto print "Hola!" a la pantalla.

2 Escriba el siguiente código:

sumnums sub {

$ Total = 0;

for ($ i = 0; i <$ @_; $ i ++) {

$ Total = $ + total @_ [$ i];

}

devolver $ totales;

}

Esta llamada a subrutina hace uso de todos los parámetros que recibe, independientemente de cuántos haya. Llamar "sumnums (2,3);" devuelve cinco ", sumnums (2,5,3);" devuelve 10 y "sumnums (6,2,4,4);" devuelve 16.

3 {sub matriz

local($parOne, $parTwo, $parThree);

($ ParOne, parTwo $, $ parThree) = ($ _ [0], $ _ [1], $ _ [2]);

imprimir "Pasaste $ ParOne, parTwo $ y $ parThree como parámetros.";

}

Esta subrutina toma los tres primeros parámetros que recibe y los asigna a las variables locales. El uso de nombres de variables específicas en subrutinas más largos puede hacer que sea más fácil de entender qué es cada uno en lugar de utilizar la matriz genérica @_.

4 Guarde el archivo de programa Perl y ejecutarlo.