Perl | cmp Operator
cmp operator in Perl is a string equality comparison operator used to compare if the two strings placed left and right to this operator are equal or less than the other.
Syntax: string1 cmp string2
Returns: -1 if string1 is less, 0 if equal and 1 if greater than string2.
Example 1: When String1 is less than String2
#!/usr/local/bin/perl # Initializing strings $a = "Beginner" ; $b = "Welcome" ; # Comparing strings $c = $a cmp $b ; # Printing the comparison result print ( "Comparison of \$a and \$b returns $c" ); |
Output:
Comparison of $a and $b returns -1
Example 2: When String1 is equal to String2
#!/usr/local/bin/perl # Initializing strings $a = "Welcome" ; $b = "Welcome" ; # Comparing strings $c = $a cmp $b ; # Printing the comparison result print ( "Comparison of \$a and \$b returns $c" ); |
Output:
Comparison of $a and $b returns 0
Example 3: When String1 is greater than String2
#!/usr/local/bin/perl # Initializing strings $a = "Welcome" ; $b = "Beginner" ; # Comparing strings $c = $a cmp $b ; # Printing the comparison result print ( "Comparison of \$a and \$b returns $c" ); |
Output:
Comparison of $a and $b returns 1