ActivePerl Subroutines

$ _ [1]; min $ kvadrat = $ summa * $ summan; returnera $ kvadrat; } Min $ result = mySub ($ num1, $ num2); print $ result; Läs och prova ovanstående kod (förklaring nedan). Den här gången variablerna har deklarerats och tilldelats utanför subrutinen. Några andra subrutin någon annanstans i koden kan faktiskt ändra dessa värden. Däremot kan en subrutin inte ändra värdet på en variabel inuti en annan subrutin (allt är lika). I den näst sista ett uttalande, där subrutinen kallas; parentes har två variabler. Dessa variabler i denna position kallas argument.

Dessa argument subrutinen är de variabler som deklarerats utanför subrutinen. Argumenten till en subrutin samtal kan vara literals, något i stil med: min $ result = mySub (4, 5); Varje subrutin definition blocket, har en array med namnet,_. Namnet på gruppen är _; det föregås av @ eftersom den är en array. Denna grupp är inte ses av er programmerare, men du kan använda den. Så snart utförandet av subrutinen (blocket) startar, de argument som skickas till subrutinen bli delar av denna matris, i den ordning som skickas. I ovanstående kod, argumentet, $ num1 som är 4, blir värdet på $ _ [0].

Den andra argument, $ num2, vilket är 5 blir värdet på $ _ [1]. Detta förklarar det första meddelandet i sub rutin blocket ovanför. Läs koden igen. De fördefinierade utskriftsfunktionen Vi har använt utskriftsfunktionen, passerar bara ett argument varje gång vi kallade det. Du kan faktiskt passera mer än ett argument. Separera argument med kommatecken som i följande kod: använd strikt; print "Content-Type: text /html \\ n \\ n"; print ("en", "Försök ovanstående kod. Det finns faktiskt fem argument i listan. Var och en av argumentet är en bokstavlig.

Glöm inte att parentes är frivilligt för tryck och andra fördefinierade funktioner, samt för som du definierar. Hej, kan du använda variabler i stället för litteraler (se hur nedan). Låt oss sluta här och fortsätter i nästa del. Chrys att komma fram till någon av delarna i denna serie, skriv bara motsvarande titel nedan i sökrutan på den här sidan och klicka på Sök (använd menyn om sådan finns): Komma igång med ActivePerl ActivePerl Basic Syntax Grunderna i ActivePerl variabler ActivePerl villkorssatser Boolean logik för ActivePerl Boolean logik och ActivePerl villkor ActivePerl Jämförelse och Aritmetiska operatorer ActivePerl Loop Uttalanden ActivePerl Arrays ActivePerl Hashes ActivePerl Variabla typer och Context ActivePerl subrutiner ActivePerl foreach loop Introduktion till