Confronto di stringhe perl

“Esistono molte opzioni in Perl per confrontare i valori delle stringhe. Un modo è usare il “CMP"Operatore e un altro modo è utilizzare gli operatori di confronto, che lo sono "Eq", "Ne", "LT.”E“ GT." IL "=="L'operatore viene utilizzato per il confronto dei numeri solo in Perl. In questo tutorial sono stati mostrati diversi modi di confrontare due stringhe in Perl."

Confronta le stringhe usando l'operatore "CMP"

L'operatore "CMP" viene utilizzato per confrontare due stringhe e scoprire se il primo è inferiore o uguale a o maggiore della seconda stringa. Crea un file Perl con il seguente codice per conoscere gli usi dell'operatore "CMP" in Perl. Due valori di stringa verranno prelevati dall'utente per il confronto. La funzione Chomp () è stata utilizzata nel codice per rimuovere la nuova linea da entrambi i valori di stringa prelevati dall'utente. Successivamente, l'output dell'operatore "CMP" verrà archiviato in una variabile. Il valore di ritorno dell'operatore "CMP" sarà 0 se entrambe le stringhe sono uguali. Il valore di ritorno dell'operatore "CMP" sarà 1 se la prima stringa è maggiore della seconda stringa. Il valore di ritorno dell'operatore "CMP" sarà -1 se la prima stringa è inferiore alla seconda stringa.

# Prendi due valori di stringa
Stampa "Immettere la prima stringa:";
$ Str1 = ;
Stampa "Immettere la seconda stringa:";
$ Str2 = ;
# Rimuovi Newline da ciascuna variabile di stringa
Chomp ($ STR1, $ STR2);
# Confronta le variabili di stringa usando l'operatore "CMP"
$ output = $ STR1 CMP $ STR2;
# Controlla l'output dell'operatore "CMP"
if ($ output == 0)

stampa "entrambe le stringhe sono uguali.\N";

ElSIF ($ output == 1)

stampare "$ str1 è maggiore di $ str2 \ n";

altro

stampare "$ str1 è inferiore a $ str2 \ n";

Produzione

Secondo il seguente output, il codice è stato eseguito tre volte. Il primo valore di input era "Ciao,"E il secondo valore di input era"Ciao"Nella prima esecuzione del codice. Il personaggio "H"È maggiore del personaggio"H"Basato sul valore ASCII di questi caratteri. COSÌ, "ciao è più grande di ciao"È stato stampato nel primo output. Per la stessa ragione, "Ciao è meno di ciao"È stato nel secondo output. Entrambi "Ciao" e "ciao" sono uguali che sono stati presi nella terza esecuzione del codice. COSÌ, "Entrambe le stringhe sono uguali."È stato stampato nel terzo output.

Confronta le stringhe usando l'operatore "EQ"

IL "Eq"L'operatore viene utilizzato in Perl per scoprire se due valori di stringa sono uguali o no. Crea un file Perl con il seguente codice per conoscere l'uso del "Eq"Operatore per confrontare i valori delle stringhe. Due valori di stringa sono stati archiviati in due variabili. La prima parola di entrambi i valori di stringa è uguale, e questo è "Bene,"Ma la seconda parte dei valori della stringa non è uguale. Così il "Eq"L'operatore restituirà un file falso valore.

# Dichiarare due variabili di stringa
$ Str1 = "buongiorno";
$ Str2 = "ciao ciao";
# Confronta le stringhe usando l'operatore "EQ"
if ($ STR1 EQ $ STR2)

stampa "entrambe le stringhe sono uguali.\N";

altro

stampa "le stringhe non sono uguali.\N";

Produzione

Verrà visualizzato il seguente output dopo aver eseguito il codice sopra.

Confronta le stringhe usando l'operatore "NE"

IL "ne"L'operatore viene utilizzato in Perl per scoprire se due valori di stringa non sono uguali o no. Crea un file Perl con il seguente codice per conoscere l'uso del "ne"Operatore per confrontare i valori delle stringhe. Due valori di stringa sono stati archiviati in due variabili. I primi 4 caratteri di entrambi i valori di stringa sono uguali, e questo è "Bene,"Ma la seconda parte dei valori della stringa non è uguale. Qui, il funzione substr () è stato usato per tagliare i primi 4 caratteri da entrambi i valori di stringa e successivamente, i valori sono stati confrontati con l'operatore "NE". Così il "ne"L'operatore restituirà un file falso valore.

# Dichiarare due variabili di stringa
$ Str1 = "buongiorno";
$ Str2 = "ciao ciao";
# Confronta la parte particolare delle stringhe usando l'operatore 'ne'
if (substr ($ STR1,0,4) NE substr ($ STR2,0,4))

Stampa "I primi 4 caratteri di entrambe le stringhe non sono uguali.\N";

altro

Stampa "I primi 4 caratteri di entrambe le stringhe sono uguali.\N";

Produzione

Verrà visualizzato il seguente output dopo aver eseguito il codice sopra.

Confronta le stringhe usando l'operatore "LT"

IL "lt"L'operatore viene utilizzato in Perl per scoprire se la prima stringa è inferiore alla seconda stringa o meno. Crea un file Perl con il seguente codice per conoscere l'uso del "lt"Operatore per confrontare i valori delle stringhe. Qui, il substr () La funzione è stata utilizzata per tagliare i caratteri dalla posizione 5 alla parte rimanente di entrambe le stringhe. Successivamente, i valori sono stati confrontati con "lt"Operatore. Qui, il personaggio "M"È maggiore del personaggio"B"Basato sul valore ASCII. Così il "lt"L'operatore restituirà un file falso valore.

# Dichiarare due variabili di stringa
$ Str1 = "buongiorno";
$ Str2 = "ciao ciao";
# Confronta la parte particolare delle stringhe usando l'operatore "LT"
if (substr ($ str1,5) lt substr ($ str2,5))

stampare "$ str1 è inferiore a $ str2 \ n";

altro

stampare "$ str1 è maggiore di $ str2 \ n";

Produzione

Verrà visualizzato il seguente output dopo aver eseguito il codice sopra.

Confronta le stringhe usando l'operatore "GT"

IL "Gt"L'operatore viene utilizzato in Perl per scoprire se la prima stringa è maggiore della seconda stringa o meno. Crea un file Perl con il seguente codice per conoscere l'uso del "Gt"Operatore per confrontare i valori delle stringhe. Verranno prelevate due valori di stringa dall'utente. IL funzione chomp () è stato usato qui per rimuovere la nuova linea dai valori di input prima di confrontare i valori usando "Gt"Operatore.

# Prendi due valori di stringa
Stampa "Immettere la prima stringa:";
$ Str1 =;
Stampa "Immettere la seconda stringa:";
$ Str2 =;
# Confronta le stringhe usando l'operatore 'GT'
if (chomp ($ str1) gt chomp ($ str2))

stampare "$ str1 è maggiore di $ str2 \ n";

altro

stampare "$ str1 è inferiore a $ str2 \ n";

Produzione

Verrà visualizzato il seguente output dopo aver eseguito il codice sopra per i valori di input, "Hello World" e "Hello World."

Conclusione

In questo tutorial sono stati mostrati diversi modi di confrontare i valori delle stringhe in Perl. Gli utenti perl possono utilizzare uno qualsiasi degli operatori di confronto per confrontare i valori stringa in Perl.