Longueur de la chaîne Perl

«La fonction perl le long () est utilisée pour compter le nombre total de caractères d'une chaîne. La valeur de la chaîne est passé comme l'argument de la fonction de longueur (), et le nombre total de caractères est renvoyé par cette fonction. Si aucune valeur d'argument n'est transmise à cette fonction, alors cette fonction comptera les caractères totaux de la variable scalaire, $ _. Les utilisations de cette fonction ont été montrées dans ce tutoriel."

Syntaxe
Les syntaxes de la fonction de longueur () de perl sont données ci-dessous.

1. longueur
   La fonction Longueur () sans aucun argument renvoie la longueur de la variable, $ _.
2. longueur (variable)
   La fonction Longueur () avec la variable d'argument renverra la longueur de la variable d'argument.

Différentes utilisations du script Perl ont été affichées dans la partie suivante de ce tutoriel.

Exemple-1: compter la longueur de la variable $ _

Créez un fichier perl avec le code suivant qui comptera le nombre total de caractères de la valeur de chaîne stocké dans la variable scalaire. Une valeur de chaîne a été stockée dans la variable scalaire. Le imprimer L'opérateur a été utilisé pour imprimer la valeur de la variable scalaire. Le longueur() La fonction sans aucun argument a été utilisée pour compter la longueur de la variable scalaire. Ensuite, la valeur de retour du longueur() La fonction a été imprimée.

Imprimez "la valeur de la variable scalaire: \ n";
# Définir la variable spéciale $ _
$ _ = "Bienvenue à Linuxhint \ n";
# Imprime la valeur de $ _
imprimer;
# Compter la longueur de $ _
$ total = longueur;
# Imprimez le nombre total de caractères
Imprimer "Nombre total de caractères: $ total \ n";

Sortir:

La sortie suivante apparaîtra après avoir exécuté le code ci-dessus.

Exemple-2: comptez la longueur de la variable de chaîne

Créer un fichier perl avec le code suivant qui comptera le nombre total de caractères de la variable de chaîne. Le nom d'utilisateur et le mot de passe seront tirés de l'utilisateur et stockés en deux variables, $ d'utilisateur et $ mot de passe. La fonction chomp () a été utilisée pour supprimer la nouvelle ligne des variables. La fonction Longueur () a été utilisée ici pour compter la longueur des valeurs de nom d'utilisateur $ et $ mot de passe. Si la durée du nom d'utilisateur $ est inférieure à 6, alors le message, «Le nom d'utilisateur doit contenir 6 caractères." sera imprimé. Si la longueur du mot de passe $ est inférieure à 6 et supérieure à 12, alors le message, «Le mot de passe peut mesurer de 6 à 12 caractères." sera imprimé. Après avoir validé les valeurs d'entrée, si la valeur du nom d'utilisateur $ est «Fahmida» et que le mot de passe $ est «secret», alors un message de réussite sera imprimé; Sinon, un message d'échec sera imprimé.

# Prenez l'entrée de l'utilisateur
Imprimer "Entrez le nom d'utilisateur: \ n";
$ nom d'utilisateur = < >;
# Supprimer le caractère Newline
chomp ($ username);
Imprimer "Entrez le mot de passe: \ n";
$ mot de passe = < >;
# Supprimer le caractère Newline
chomp ($ mot de passe);
# Vérifiez la durée de la variable de nom d'utilisateur $
if (le long ($ nom d'utilisateur) < 6)

Die "Le nom d'utilisateur doit contenir 6 caractères.\ n ";

if (longueur ($ mot de passe) < 6 || length($password) > 12)

Die "Le mot de passe peut mesurer de 6 à 12 caractères.\ n ";

# Vérifiez la durée de la variable de mot de passe $
if ($ username eq 'Fahmida' && $ mot de passe eq 'secret')

Imprimer "Utilisateur authentifié.\ n ";

autre

Imprimer "Utilisateur non authentifié.\ n ";

Sortir:
La sortie suivante apparaîtra après l'exécution du code avec le nom d'utilisateur valide mais les entrées de mot de passe non valides. La valeur d'entrée, «Fahmida», est des données valides et le nom d'utilisateur correct. La valeur d'entrée, «1234», est des données non valides.

La sortie suivante apparaîtra après avoir exécuté le code avec le nom d'utilisateur non valide mais un mot de passe valide. La valeur d'entrée, «admin», est des données non valides. La valeur d'entrée, «Secret», est des données valides et le mot de passe correct.

La sortie suivante apparaîtra après avoir exécuté le code avec le nom d'utilisateur valide mais un mot de passe incorrect. La valeur d'entrée, «Fahmida», est des données valides et le nom d'utilisateur correct. La valeur d'entrée, «123456», est des données valides mais un mot de passe incorrect.

La sortie suivante apparaîtra après avoir exécuté le code avec le nom d'utilisateur et le mot de passe corrects. La valeur d'entrée, «Fahmida», est des données valides et le nom d'utilisateur correct. La valeur d'entrée, «Secret», est des données valides et le mot de passe correct.

Exemple-3: Comptez la longueur de la variable de chaîne en octets

Vous devez utiliser le octets module pour compter la longueur des cordes en octets. Créez un fichier perl avec le code suivant qui utilise le octets module pour compter la longueur des données de chaîne données au format hexadécimal. La valeur de chaîne d'origine et le nombre d'octets de cette valeur de chaîne seront imprimés plus tard.

utiliser les octets;
# Définir les données de chaîne par valeur hexadécimale
$ data = "\ x 35 \ x 250 \ x 245 \ n";
# Imprimez la valeur de la chaîne des données hexadécimales
Imprimer "La valeur de la chaîne est", $ data;
# Imprimez la longueur de la chaîne en octets
Imprimer "La longueur de la chaîne est:", longueur ($ data) "."," \ n ";

Sortir:
La sortie suivante apparaîtra après avoir exécuté le code.

Exemple-4: comptez la longueur de chaque élément de tableau

Créez un fichier perl avec le code suivant qui comptera la longueur de chaque valeur de chaîne du tableau. Un tableau de 4 valeurs de chaîne a été défini dans le code. Le pour chaque Loop a été utilisé ici pour itérer les valeurs du tableau et, compter et la longueur de chaque valeur de tableau.

# Déclarer un éventail de chaînes
@usernames = ("Nupur22", "hossainbd", "kamal12", "bela89");
# Itérer les valeurs du tableau en utilisant pour la boucle
pour ($ i = 0; $ i <= $#usernames; $i++)

# Comptez la longueur de chaque valeur de tableau
$ Len = length ($ noms [$ i]);
# Imprimez la longueur de la valeur du tableau
imprimer "la durée de $ noms [$ i] est $ len \ n";

Sortir:
La sortie suivante apparaîtra après avoir exécuté le code.

Conclusion

Les utilisations de la fonction longue () pour compter la longueur de la valeur de la chaîne et appliquer la sortie de la fonction de longueur () à différentes fins ont été montrées dans ce tutoriel en utilisant des exemples Perl. J'espère que ce tutoriel aidera les utilisateurs de Perl à utiliser la fonction Longueur () pour compter correctement la longueur de la chaîne dans leur code.