Programação  
 
Conhecimento computador >> Programação >> Programação Perl >> 
Como passar parâmetros para sub-rotinas em Perl
Ao contrário de muitas outras linguagens de programação , quando você escrever o código para sub-rotinas em Perl , você não incluir uma lista de parâmetros que a função aceita. No entanto, se você sabe que a função irá receber um ou mais parâmetros , você ainda precisa programar o sub-rotina para usá-los. Quaisquer parâmetros passados ​​para uma sub-rotina de Perl são armazenadas no " @ _ " matriz , que é uma lista de matriz especial . Isto significa basicamente que cada sub-rotina que você criar pode aceitar qualquer número de parâmetros , mas quantos você precisa e como você usá-los é determinada pelo código da sub-rotina. Instruções
1

Abra um arquivo de programa Perl. Digite o seguinte código:

sub linha {

$ var = @ _ [0]; }


Esta sub-rotina usa o "@ _" matriz para obter os parâmetros , mas apenas faz com que o uso da primeira. Chamar ou " linha ('Olá ! '); " Ou " linha ('Olá ! ', ' Como você está? '); " Tanto print " Olá ! " . na tela
2

Digite o seguinte código:

sub addNums {

$ Total = 0;

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

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


retornar $ total;

}

Esta chamada de sub-rotina faz uso de todos os parâmetros passados ​​para ele , independentemente de quantas houver . Chamando " addNums (2,3) ;" retorna cinco ", addNums ( 2,5,3 ) ; " retorna 10 e " addNums ( 6,2,4,4 ); " retorna 16
< . br> 3

sub matriz {

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

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

print " Você passou $ ParOne , parTwo $ e US $ parThree como parâmetros. ";

}

esta sub-rotina leva os três primeiros parâmetros passados ​​para ele e atribui -los a variáveis ​​locais. Usando nomes de variáveis ​​específicas de sub-rotinas mais longas podem torná-lo mais fácil de entender o que cada um é para em vez de usar o genérico @ _ array.
4

Salve o arquivo de programa Perl e executá-lo .
< Br >

Anterior :

Próximo : No
  Os artigos relacionados
·Como limpar Perl Script Formato 
·Como ler um arquivo XML em FH Perl 
·Como fazer uma API do Twitter Córrego em Perl 
·Como remover o último elemento de uma lista Perl 
·Como limpar o Start & extremidade de uma corda em Perl 
·Como depurar Perl no Windows 
·Como substituir passados ​​espaços com expressões reg…
·Como escrever um script Perl para processar um formulá…
·O que é a sintaxe Perl para URL Encoding 
·Como ler a partir do meio de uma matriz em Perl 
  Artigos em destaque
·Como fazer seu próprio Web Browser em C # 
·Como fazer comentários em um arquivo PHP 
·Como ignorar pontuação em Java 
·Como aprender JAVA Básico 
·Como aparar esquerda e à direita espaços em branco 
·Como escrever um programa que tira 10 inteiros como ent…
·Como usar a função strcmp em C + + 
·Como usar o Microsoft Basic 
·Definir Infinite Loop 
·Como usar o Enterprise Library Bloquear acesso a dados 
Cop e direita © Conhecimento computador http://ptcomputador.com Todos os Direitos Reservados