Citation Perl

Auteur：Eve Cole Date de mise à jour：2024-12-26 11:12:01

Une référence est un pointeur. Une référence Perl est un type scalaire qui peut pointer vers une variable, un tableau, une table de hachage (également appelée tableau associatif) ou même un sous-programme, et peut être appliqué n'importe où dans le programme.

Créer une référence

Lors de la définition d'une variable, ajoutez devant le nom de la variable pour obtenir une référence à la variable, par exemple :

 $scalarref = $foo; # Référence de variable scalaire $arrayref = @ARGV; # Référence de liste $hashref = %ENV # Référence de hachage $coderef = &handler; référence

Nous pouvons utiliser des références de tableau anonymes dans les tableaux, en utilisant la définition [] :

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

Les éléments d'un tableau anonyme peuvent toujours être un tableau anonyme, nous pouvons donc utiliser cette méthode pour construire un tableau de tableaux, et nous pouvons construire un tableau de n'importe quelle dimension.

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

Dans les hachages, nous pouvons utiliser des références de hachage anonymes, définies à l'aide de {} :

 $href= { APR =>4, AOÛT =>8 } ;

Nous pouvons également créer une référence de sous-programme anonyme sans nom de sous-programme :

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

déréférencement

Le déréférencement peut être annulé en utilisant $, @ ou % selon différents types. Les exemples sont les suivants :

Exemple

#!/usr/bin/perl $var = 10 ; # $r fait référence au scalaire $var $r = $var # Afficher la valeur variable de $r stockée localement imprimer " $var est : " , $ $r , " n " ; @var = ( 1 , 2 , 3 ) # $r fait référence au tableau @var ; $r = @var ; # Afficher la valeur variable de $r stockée localement imprimer " @var est : " , @ $r , " n " ; %var = ( ' key1 ' => 10 , ' key2 ' => 20 ) # $r fait référence au tableau %var ; $r = %var # Afficher la valeur variable de $r stockée localement imprimer " %var est : " , % $r , " n " ;

Le résultat de l’exécution de l’exemple ci-dessus est :

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

Si vous n'êtes pas sûr du type de variable, vous pouvez utiliser ref pour le déterminer. La liste des valeurs de retour est la suivante. S'il n'y a pas de valeur suivante, elle renvoie false :

 SCALARARRAYHASHCODEGLOBREF

Les exemples sont les suivants :

Exemple

#!/usr/bin/perl $var = 10 ; $r = $var imprimer ; " Type de référence de r : " , ref ( $r ) , " n " ; @var = ( 1 , 2 , 3 ) $ r = @var ; " Type de référence de r : " , ref ( $r ) , " n " ; %var = ( ' key1 ' = > 10 , ' key2 ' = > 20 ) ; " Type de référence de r : " , ref ( $r ) , " n " ;

Le résultat de l’exécution de l’exemple ci-dessus est :

 Type de référence de r : SCALAIRE Type de référence de r : ARRAYr Type de référence : HASH

référence circulaire

Une référence circulaire se produit lorsque deux références se contiennent. Vous devez l'utiliser avec précaution, sinon cela provoquera des fuites de mémoire, comme dans l'exemple suivant :

Exemple

#!/usr/bin/perl mon $foo = 100 ; $foo = $foo ; " La valeur de foo est : " , $ $foo , " n " ;

Le résultat de l’exécution de l’exemple ci-dessus est :

 La valeur de foo est : REF(0x9aae38)

fonction de référence

Format de référence de fonction : &

Le format d'appel de la fonction de référence : & + le nom de référence créé.

Les exemples sont les suivants :

Exemple

#!/usr/bin/perl # Définition de la fonction sous ImprimerHash { mon ( %hash ) = @_ ; pour chaque $article ( %hachage ) { imprimer " Élément : $élément n " ; } %hash = ( ' name ' => ' codercto ' , ' age ' => 3 ) # Créer une référence à la fonction ; $cref = & PrintHash ; # Appeler la fonction en utilisant la référence & $cref ( %hash ) ;

Le résultat de l’exécution de l’exemple ci-dessus est :

 élément : élément d'âge : 3 élément : élément de nom : codercto