Example for if-elsif-else statement

Script

#!/usr/bin/perl

print ("Enter a number: ");
$number1 = <STDIN>;
chop($number1);
print ("Enter a second number: ");
$number2 = <STDIN>;
chop($number2);

if ($number1 == $number2)
{
print("The two numbers are equal. \n");
}
elsif ($number1 == $number2 + 1)
{
print ("The first number is greater than the second number by one. \n");
}
elsif ($number1 == $number2 - 1)
{
print ("The first number is lesser than the second number by one. \n");
}
else
{
print ("The two numbers are not equal. \n");
}

Execution

Enter a number: 15

Enter a second number: 16

The first number is lesser than the second number by one.

Enter a number: 33

Enter a second number: 32

The first number is greater than the second number by one.

Enter a number: 56

Enter a second number: 67

The two numbers are not equal.

Enter a number: 45

Enter a second number: 45

The two numbers are equal.