I motsetning til mange andre programmeringsspråk , når du skriver koden for subrutiner i Perl , trenger du ikke inkludere en liste over parametere at funksjonen godtar. Men hvis du kjenner funksjonen vil motta én eller flere parametere , du fortsatt trenger å programmere subrutinen å bruke dem. Eventuelle parametere som sendes til en Perl subrutine er lagret i «@ _" matrise , som er en spesiell liste matrise . Dette betyr i utgangspunktet at hver subrutine du oppretter kan godta en rekke parametere , men hvor mange du trenger og hvordan du bruker dem bestemmes av subrutinen kode . Instruksjoner
en
Åpne et Perl program fil . Skriv inn følgende kode :
sub linjen {
$ var = @ _ [ 0 ];
}
p Dette subrutine bruker " @ _" matrise for å få parametrene, men bare gjør bruk av den første. Ringe enten "-linjen ('Hei ! '); " Eller "-linjen ('Hei ! ', ' Hvor er du? '); " Både print " Hello! " . til skjermen
2
Skriv inn følgende kode :
sub addNums {
$ total = 0;
for ($ i = 0 ; $ i < @ _ ; $ i + + ) {
$ total = $ totalt + @ _ [$ i] ;
}
returnerte $ totalt;
}
p Dette subrutine samtale gjør bruk av alle parametere som sendes til det, uansett hvor mange eksisterer . Calling " addNums ( 2,3) , " returnerer fem , " addNums ( 2,5,3 )," returnerer 10 og " addNums ( 6,2,4,4 ) ; " . Returnerer 16
3
sub matrisen {
lokale ( $ parOne , $ parTwo , $ parThree ) ;
( $ parOne , $ parTwo , $ parThree ) = ( $ _ [ 0 ] , $ _ [ 1 ] , $ _ [ 2 ] ); " . Du passert $ parOne , $ parTwo og $ parThree som parametre "
print ;
}
denne subrutine tar de første tre parametere som sendes til det, og tildeler dem til lokale variabler . Med bestemte variabelnavn i lengre subrutiner kan gjøre det lettere å forstå hva hver enkelt er for i stedet for å bruke den generiske @ _ array.
4
Lagre Perl program filen og kjør den.