Cómo pasar parámetros a subrutinas en Perl

A diferencia de muchos otros lenguajes de programación , al escribir el código de subrutinas en Perl, no se incluye una lista de los parámetros que la función acepta . 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 " @ _" array, que es una variedad especial de la lista . Esto básicamente significa que cada subrutina que cree puede aceptar cualquier número de parámetros , pero ¿cuántos necesita y cómo usarlos es determinado por el código de la subrutina. Instrucciones
1

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

sub line {

$ var = @ _ [ 0 ] ;

}

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

Escriba el siguiente código:

sub addNums {

$ Total = 0 ;

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

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

}

return $ total,

}

llamada de subprograma hace uso de todos los parámetros que se le pasa , sin importar cuántos existen . Llamada " addNums (2,3) ; " devuelve cinco , " addNums ( 2,5,3 ) ; " devuelve 10 y " addNums ( 6,2,4,4 ) ; " . Vuelve 16

3

sub matriz {

locales ($ ParOne , $ parTwo , $ parThree ) ;

($ ParOne , $ parTwo , $ parThree ) = ( $ _ [ 0 ] , $ _ [ 1 ], $ _ [ 2 ] ) ; " . pasaste ParOne $ , $ y $ parTwo parThree como parámetros "

impresión ;

}

Este subprograma tiene los tres primeros parámetros que se le pasan y los asigna a variables locales. El uso de nombres de variables específicas en subrutinas más puede hacer que sea más fácil de entender qué es cada uno en lugar de utilizar el genérico @ _ array.
4

Guardar el archivo de programa Perl y ejecutarlo.