I modsætning til mange andre programmeringssprog , når du skriver koden for subrutiner i Perl behøver du ikke medtage en liste over parametre , at funktionen accepterer. Men hvis du kender funktionen vil modtage en eller flere parametre , skal du stadig at programmere subrutine til at bruge dem . Eventuelle parametre videre til et Perl subrutine gemmes i " @ _" array, som er en særlig liste array. Dette indebærer som udgangspunkt , at hver subrutine du opretter kan acceptere nogen række parametre , men hvor mange du har brug for og hvordan du bruger dem er bestemt af underrutinen kode. Instruktioner
1
Åbn en Perl program fil. Indtast følgende kode : Hej
sub linie {
$ var = @ _ [ 0 ]
}
Denne subrutine bruger " @ _" matrix for at få de parametre , men kun gør brug af den første. Opkald enten " linje ( 'Hello ! '); " Eller " linje ( 'Hello ! ', ' Hvordan har du det ? '); " Både print " Hello! " . til skærmen
2
Indtast følgende kode :
sub addNums {
$ total = 0;
for ($ i = 0 , $ i < @ _ , $ i + +) {
$ total = $ total + @ _ [ $ i] ;
}
tilbagevenden $ total; < br >
}
Denne subrutine opkald gør brug af alle de parametre videre til det, uanset hvor mange der findes . Opkald " addNums (2,3) ," returnerer fem , " addNums ( 2,5,3 ) " returnerer 10 og " addNums ( 6,2,4,4 ), " . Returnerer 16
< br > 3
sub matrixen {
lokale ( $ parOne , $ parTwo , $ parThree ),
( $ parOne , $ parTwo , $ parThree ) = ( $ _ [0] , $ _ [1], $ _ [2 ]) . " Du passerede $ parOne , $ parTwo og $ parThree som parametre "
print ,
}
denne subrutine tager de første tre parametre videre til det og tildeler dem til lokale variable . Ved hjælp af konkrete variabelnavne i længere subrutiner kan gøre det lettere at forstå, hvad de hver især er for stedet for at bruge den generiske @ _ array.
4
Gem Perl program filen og køre den.
< Br >