Lunghezza della stringa perl
Sintassi
Le sintassi della funzione di lunghezza () di Perl sono riportate di seguito.
- lunghezza
La funzione di lunghezza () senza alcun argomento restituirà la lunghezza della variabile, $ _. - lunghezza (variabile)
La funzione di lunghezza () con la variabile dell'argomento restituirà la lunghezza della variabile dell'argomento.
Diversi usi dello script Perl sono stati mostrati nella prossima parte di questo tutorial.
Esempio-1: conta la lunghezza della variabile $ _
Crea un file Perl con il seguente codice che conterrà il numero totale di caratteri del valore stringa memorizzato nella variabile scalare. Un valore di stringa è stato memorizzato nella variabile scalare. IL stampa L'operatore è stato utilizzato per stampare il valore della variabile scalare. IL lunghezza() La funzione senza alcun argomento è stata utilizzata per contare la lunghezza della variabile scalare. Successivamente, il valore di ritorno del lunghezza() La funzione è stata stampata.
stampare "il valore della variabile scalare: \ n";
# Definisci la variabile speciale $ _
$ _ = "Benvenuti a Linuxhint \ n";
# Stampa il valore di $ _
stampa;
# Conta la durata di $ _
$ totale = lunghezza;
# Stampa il numero totale di caratteri
Stampa "Numero totale di caratteri: $ totale \ n";
Produzione:
Verrà visualizzato il seguente output dopo aver eseguito il codice sopra.
Esempio-2: conta la lunghezza della variabile della stringa
Crea un file Perl con il seguente codice che conterà il numero totale di caratteri della variabile stringa. Il nome utente e la password verranno prelevati dall'utente e memorizzati in due variabili, $ username e $ password. La funzione Chomp () è stata utilizzata per rimuovere la nuova linea dalle variabili. La funzione di lunghezza () è stata utilizzata qui per contare la lunghezza del nome utente $ e $ password. Se la durata del nome utente $ è inferiore a 6, allora il messaggio, “Il nome utente deve contenere 6 caratteri." sarà stampato. Se la lunghezza della password $ è inferiore a 6 e maggiore di 12, allora il messaggio, “La password può essere lunga da 6 a 12 caratteri." sarà stampato. Dopo aver convalidato i valori di input, se il valore del nome utente $ è "fahmida" e la password $ è "segreta", verrà stampato un messaggio di successo; Altrimenti, verrà stampato un messaggio di errore.
# Prendi l'input dall'utente
stampare "Immettere il nome utente: \ n";
$ username = < >;
# Rimuovi il carattere di Newline
Chomp ($ nome utente);
Stampa "Inserisci password: \ n";
$ password = < >;
# Rimuovi il carattere di Newline
chomp ($ password);
# Controlla la lunghezza della variabile $ username
if (lunghezza ($ nome utente) < 6)
Il nome utente Die "deve contenere 6 caratteri.\N";
if (lunghezza ($ password) < 6 || length($password) > 12)
morire "la password può essere lunga da 6 a 12 caratteri.\N";
# Controlla la durata della variabile $ password
if ($ username eq 'fahmida' && $ password eq 'segreto')
Stampa "utente autenticato.\N";
altro
Stampa "Utente non autenticato.\N";
Produzione:
Verrà visualizzato il seguente output dopo aver eseguito il codice con il nome utente valido ma gli ingressi della password non validi. Il valore di input, "Fahmida", è dati validi e il nome utente corretto. Il valore di input, "1234", è dati non validi.
Verrà visualizzato il seguente output dopo aver eseguito il codice con il nome utente non valido ma una password valida. Il valore di input, "amministratore", è dati non validi. Il valore di input, "segreto", sono dati validi e la password corretta.
Verrà visualizzato il seguente output dopo aver eseguito il codice con il nome utente valido ma una password errata. Il valore di input, "Fahmida", è dati validi e il nome utente corretto. Il valore di input, "123456", è dati validi ma una password errata.
Verrà visualizzato il seguente output dopo aver eseguito il codice con il nome utente e la password corretti. Il valore di input, "Fahmida", è dati validi e il nome utente corretto. Il valore di input, "segreto", sono dati validi e la password corretta.
Esempio-3: conta la lunghezza della variabile stringa in byte
Devi usare il byte modulo per contare la lunghezza delle corde in byte. Crea un file Perl con il seguente codice che utilizza il byte Modulo per contare la lunghezza dei dati della stringa indicati in formato esadecimale. Il valore della stringa originale e il numero di byte di quel valore di stringa verranno stampati in seguito.
usare byte;
# Definisci i dati di stringa per valore esadecimale
$ data = "\ x 35 \ x 250 \ x 245 \ n";
# Stampa il valore della stringa dei dati esadecimali
Stampa "Il valore stringa è", $ dati;
# Stampa la lunghezza della stringa in byte
Stampa "La lunghezza della stringa è:", lunghezza ($ dati), "byte.", "\N";
Produzione:
Verrà visualizzato il seguente output dopo aver eseguito il codice.
Esempio-4: conta la lunghezza di ciascun elemento di array
Crea un file Perl con il seguente codice che conta la lunghezza di ciascun valore della stringa dell'array. Un array di 4 valori di stringa è stato definito nel codice. IL per ciascuno Loop è stato usato qui per iterare i valori dell'array e, conta e la lunghezza di ciascun valore dell'array.
# Dichiara una serie di stringhe
@UserNames = ("Nupur22", "HossainBd", "Kamal12", "Bela89");
# Itera i valori dell'array usando per loop
per ($ i = 0; $ i <= $#usernames; $i++)
# Conta la lunghezza di ciascun valore dell'array
$ len = lunghezza ($ utente [$ i]);
# Stampa la lunghezza del valore dell'array
stampare "La durata di $ nomi utente [$ i] è $ len \ n";
Produzione:
Verrà visualizzato il seguente output dopo aver eseguito il codice.
Conclusione
L'uso della funzione lunghezza () per contare la lunghezza del valore della stringa e applicare l'output della funzione di lunghezza () per scopi diversi sono stati mostrati in questo tutorial utilizzando esempi perl. Spero che questo tutorial aiuti gli utenti perl a utilizzare la funzione lunghezza () per contare la lunghezza della stringa nel loro codice correttamente.