Esempio di operatori vari Perl

Ci sono i seguenti operatori vari supportati dal linguaggio Perl. Supponiamo che la variabile a contenga 10 e la variabile b contenga 20, quindi -

Sr.No. Operatore e descrizione
1

.

L'operatore binario punto (.) Concatena due stringhe.

Example - Se $ a = "abc", $ b = "def" allora $ a. $ B darà "abcdef"
2

x

L'operatore di ripetizione x restituisce una stringa composta dall'operando sinistro ripetuto il numero di volte specificato dall'operando destro.

Example - ('-' x 3) darà ---.
3

..

L'operatore di intervallo .. restituisce un elenco di valori contando (aumentando di uno) dal valore sinistro al valore destro

Example - (2..5) darà (2, 3, 4, 5)
4

++

L'operatore Incremento automatico aumenta il valore intero di uno

Example - $ a ++ darà 11
5

--

L'operatore di decremento automatico riduce il valore intero di uno

Example - $ a-- darà 9
6

->

L'operatore freccia viene utilizzato principalmente per dereferenziare un metodo o una variabile da un oggetto o dal nome di una classe

Example - $ obj -> $ a è un esempio per accedere alla variabile $ a dall'oggetto $ obj.

Esempio

Prova il seguente esempio per comprendere tutti gli operatori vari disponibili in Perl. Copiare e incollare il seguente programma Perl nel file test.pl ed eseguire questo programma.

#!/usr/local/bin/perl

$a = "abc";
$b = "def";

print "Value of \$a  = $a and value of \$b = $b\n";
 
$c = $a . $b;
print "Value of \$a . \$b = $c\n";

$c = "-" x 3;
print "Value of \"-\" x 3 = $c\n";

@c = (2..5);
print "Value of (2..5) = @c\n";

$a = 10;
$b = 15;
print "Value of \$a  = $a and value of \$b = $b\n";

$a++;
$c = $a ;
print "Value of \$a after \$a++ = $c\n";

$b--;
$c = $b ;
print "Value of \$b after \$b-- = $c\n";

Quando il codice sopra viene eseguito, produce il seguente risultato:

Value of $a = abc and value of $b = def
Value of $a . $b = abcdef
Value of "-" x 3 = ---
Value of (2..5) = 2 3 4 5
Value of $a = 10 and value of $b = 15
Value of $a after $a++ = 11
Value of $b after $b-- = 14

Spiegheremo l'operatore -> quando discuteremo di oggetti e classi Perl.