Opkald en subrutine Du kalder en subrutine ved blot at skrive navnet på den subrutine, eventuelt efterfulgt af parenteser, i en erklæring. Følgende kode illustrerer dette. Læs og prøv det: Brug streng; print "Content-Type: text /html \\ n \\ n"; sub mySub {min $ num1 = 2; min $ num2 = 3; min $ sum = $ num1 + $ num2; min $ firkantet = $ sum * $ sum; returnere $ square; } Min $ resultat = mySub (); print $ resultat; Denne kode svarer til den tidligere med tilføjelse af de to sidste udsagn. Den næstsidste én sætning kalder underprogram. Denne erklæring opkald er uden subrutinen.
Den højre operand af erklæringen er "mySub ()". Det er dette udtryk, der kalder underprogram. Når det kalder underprogram, modtager den værdi, der returneres af afkastet erklæring i underprogram. Denne værdi er nu tildelt variablen, $ result. Den sidste opgørelse viser resultatet. En subrutine opkald behøver ikke altid at tildele en tilbagevenden værdi til en variabel. Subrutiner, der ikke har returværdier kaldes ved blot at skrive navnet, efterfulgt af parenteser (derefter semikolon, for at danne en erklæring).
Den næstsidste én sætning i koden er: min $ resultat = mySub (); mySub () er den funktion opkald. I ActivePerl, parenteserne er valgfri. Du kan kalde en funktion uden at skrive parenteserne. Men det er god praksis at skrive dem, da dette er nødvendigt på andre sprog; en programmør ved mere end én computer sprog. Også, kan du have mellemrum mellem funktion navn og parenteser; rummet er valgfri. Parametre og Argumenter Nu i ovenstående subrutine vi kan kun beskæftige sig med to særlige numre, som er 2 og 3. Dette er en ulempe.
Hvis vi erklærer (opret) og tildele variablerne uden for underprogram, så kan vi altid ændre værdierne af de variabler, så send variablerne til underprogram før underprogram udføres. På den måde skal vi være i stand til at håndtere mange andre par numre. Det følgende eksempel illustrerer dette: Brug streng; print "Content-Type: text /html \\ n \\ n"; m