Différentes utilisations de la référence de tableau
Les utilisations des variables de référence de tableau à différentes fins sont présentées ci-dessous :
| Variable de tableau | Variable de référence du tableau | But |
| @tableau | @{ $ref_array } | Il est utilisé pour faire référence à toutes les valeurs du tableau. |
| scalaire @tableau | scalaire @ref_array | Il est utilisé pour compter le nombre total de tableaux. |
| $#tableau | $#ref_array | Il est utilisé pour définir le plus grand index. |
| $tableau[index] | $tef_array->[index] | Il est utilisé pour faire référence à un élément particulier du tableau. |
Utilisations des références de tableaux Perl
Différentes utilisations des variables de référence du tableau Perl sont présentées dans cette partie du didacticiel.
Exemple 1 : créer une référence de tableau
Créez un fichier Perl avec le script suivant qui déclare un tableau de quatre valeurs de chaîne et la variable de référence de ce tableau. La variable de référence stocke l'emplacement mémoire du tableau principal et les deux variables partagent le même emplacement. Le contenu de la variable de référence et du tableau principal est imprimé ultérieurement.
#!/usr/bin/perl
utiliser strict ;
utiliser avertissements ;
utiliser 5.34.0 ;
utiliser Data :: Dumper ;
#Déclarer un tableau de chaîne
mon @ traînard = ( 'Perle' , 'Java' , 'Frapper' , 'Python' ) ;
#Créer une référence de la variable tableau
mon $ref_array = \ @ traînard ;
dire 'Le contenu de la référence du tableau est $ref_array' ;
dire 'Les valeurs du tableau utilisant la variable Dumber sont : ' ;
#Imprimer la variable de référence avec la variable Dumper
imprimer Tombereau $ref_array ;
Sortir:
Le résultat suivant apparaît lors de l'exécution du script :
Exemple 2 : mettre à jour le tableau après avoir créé la référence
Créez un fichier Perl avec le script suivant qui montre que si un élément du tableau principal est modifié, la valeur correspondante de la variable du tableau de référence est modifiée en même temps. Toutes les valeurs du tableau principal sont imprimées avant de mettre à jour toute valeur du tableau et toutes les valeurs du tableau de référence sont imprimées après la mise à jour du deuxième élément à l'aide de la variable « dump ».
#!/usr/bin/perl
utiliser strict ;
utiliser avertissements ;
utiliser 5.34.0 ;
utiliser Data :: Dumper ;
#Déclarer un tableau de chaîne
mon @ traînard = ( 'Perle' , 'Java' , 'Frapper' , 'Python' ) ;
dire 'Les valeurs principales du tableau sont : ' ;
#Imprimer la variable de référence avec la variable Dumper
imprimer Tombereau \ @ traînard ;
#Créer une référence de la variable tableau
mon $ref_array = \ @ traînard ;
#Mettre à jour le 2ème élément du tableau
$strarr [ 1 ] = 'C++' ;
dire 'Les valeurs du tableau de référence (après la mise à jour du tableau principal) sont : ' ;
#Imprimer la variable de référence avec la variable Dumper
imprimer Tombereau $ref_array ;
Sortir:
La sortie suivante apparaît après l'exécution du script. Selon le résultat, le deuxième élément est remplacé par « C++ » dans le tableau de référence car le deuxième élément du tableau principal est mis à jour par la valeur « C++ » :
Exemple 3 : transmettre la référence du tableau dans un sous-programme
Créez un fichier Perl avec le script suivant où la variable de référence du tableau est envoyée comme argument du sous-programme. La valeur du troisième index du tableau est mise à jour à l'aide de la variable de référence à l'intérieur du sous-programme. Les valeurs du tableau principal sont imprimées avant et après la mise à jour du troisième index de la variable de référence à l'aide de la variable « dump ».
#!/usr/bin/perlutiliser strict ;
utiliser avertissements ;
utiliser 5.34.0 ;
utiliser Data :: Dumper ;
#Déclarer un tableau de nombres
mon @ Nombres = ( 67 , 3.4 , 90 , 12 , 39 ) ;
dire 'Les valeurs du tableau principal avant la mise à jour :' ;
imprimer Tombereau \ @ Nombres ;
#Passez le tableau comme référence dans le sous-programme
read_array ( \ @ Nombres ) ;
#Déclarez le sous-programme pour modifier la valeur du tableau
sous read_array
{
#Définir la variable de référence du tableau
mon $arr_ref = $_ [ 0 ] ;
#Mettre à jour le troisième élément du tableau
$arr_ref- > [ 2 ] = 99 ;
}
dire 'Les valeurs du tableau principal après mise à jour :' ;
imprimer Tombereau \ @ Nombres ;
Sortir:
La sortie suivante apparaît après l'exécution du script. Le troisième élément du tableau était 90 et cette valeur est modifiée en 99 en utilisant la variable de référence du tableau. Le troisième élément du tableau d'origine est également mis à jour par 99 car les deux variables partagent le même emplacement :
Conclusion
Les méthodes d'accès ou de mise à jour des valeurs du tableau en créant la variable de référence du tableau sont présentées dans ce didacticiel. Les utilisateurs de Perl auront une idée claire de l'utilisation des variables de référence du tableau Perl après avoir lu ce didacticiel.