Perl-Zitat

Autor：Eve Cole Aktualisierungszeit：2024-12-26 11:12:01

Eine Referenz ist ein Zeiger. Eine Perl-Referenz ist ein Skalartyp, der auf eine Variable, ein Array, eine Hash-Tabelle (auch assoziatives Array genannt) oder sogar eine Unterroutine verweisen und an einer beliebigen Stelle im Programm angewendet werden kann.

Referenz erstellen

Fügen Sie beim Definieren einer Variablen vor dem Variablennamen hinzu, um einen Verweis auf die Variable zu erhalten, zum Beispiel:

 $scalarref = $foo; # Skalare Variablenreferenz $arrayref = @ARGV; # Hashreferenz $globref = *foo ; Referenz

Wir können anonyme Array-Referenzen in Arrays verwenden, indem wir die Definition [] verwenden:

 $aref= [ 1,"foo",undef,13 ];

Die Elemente eines anonymen Arrays können immer noch ein anonymes Array sein, sodass wir diese Methode verwenden können, um ein Array von Arrays zu erstellen, und wir können ein Array jeder Dimension erstellen.

 mein $aref = [ [1, 2, 3], [4, 5, 6], [7, 8, 9],]

In Hashes können wir anonyme Hash-Referenzen verwenden, definiert mit {}:

 $href= { APR =>4, AUG =>8 };

Wir können auch eine anonyme Unterprogrammreferenz ohne Unterprogrammnamen erstellen:

 $coderef = sub { print "Codercto!n" };

Dereferenzierung

Die Dereferenzierung kann je nach Typ mit $, @ oder % abgebrochen werden. Beispiele sind wie folgt:

Beispiel

#!/usr/bin/perl $var = 10 ; # $r bezieht sich auf den $var-Skalar $r = $var ; # Den lokal gespeicherten Variablenwert von $r ausgeben drucken " $var ist: " , $ $r , " n " ; @var = ( 1 , 2 , 3 ) ; $r = @var ; # Den lokal gespeicherten Variablenwert von $r ausgeben drucken " @var ist: " , @ $r , " n " ; %var = ( ' key1 ' => 10 , ' key2 ' = > 20 ) ; $r = %var ; # Den lokal gespeicherten Variablenwert von $r ausgeben drucken " %var ist: " , % $r , " n " ;

Das Ergebnis der Ausführung des obigen Beispiels ist:

 10 ist: 101 2 3 ist: 123%var ist: key110key220

Wenn Sie sich über den Variablentyp nicht sicher sind, können Sie ihn mithilfe von ref ermitteln. Die Liste der Rückgabewerte lautet wie folgt: Wenn kein folgender Wert vorhanden ist, wird „false“ zurückgegeben.

 SCALARARRAYHASHCODEGLOBREF

Beispiele sind wie folgt:

Beispiel

#!/usr/bin/perl $var = 10 ; $r = $ var ; „ Referenztyp von r : “ , ref ( $ r ) , „ n “ ;" Referenztyp von r: " , ref ( $ r ) , " n " ; % var = ( ' key1 ' = > 10 , ' key2 ' = > 20 ) ; „ Referenztyp von r: “ , ref ( $r ) , „ n “ ;

Das Ergebnis der Ausführung des obigen Beispiels ist:

 Referenztyp von r: SCALAR Referenztyp von r: ARRAYr Referenztyp: HASH

Zirkelverweis

Ein Zirkelverweis liegt vor, wenn zwei Verweise einander enthalten. Sie müssen es vorsichtig verwenden, da es sonst zu Speicherverlusten kommt, wie im folgenden Beispiel:

Beispiel

#!/usr/bin/perl Mein $foo = 100 ; $foo = $foo ; „ Wert von foo ist: “ , $$foo , „ n “ ;

Das Ergebnis der Ausführung des obigen Beispiels ist:

 Der Wert von foo ist: REF(0x9aae38)

Referenzfunktion

Funktionsreferenzformat: &

Das Format zum Aufrufen der Referenzfunktion: & + der erstellte Referenzname.

Beispiele sind wie folgt:

Beispiel

#!/usr/bin/perl # Funktionsdefinition sub PrintHash { Mein ( %hash ) = @_ ; foreach $item ( %hash ) { drucken " Element: $item n " ; } %hash = ( ' name ' => ' codercto ' , ' age ' => 3 ) ; # Erstelle einen Verweis auf die Funktion $cref = & PrintHash ; # Funktion mit Referenz aufrufen & $cref ( %hash ) ;

Das Ergebnis der Ausführung des obigen Beispiels ist:

 Element: Alter Element: 3 Element: Name Element: Codercto