unless statement in perl

In Perl, the unless statement is used as a conditional statement to execute a block of code only if the condition is false. It is similar to the if statement, but the condition is inverted.

The syntax for the unless statement is as follows:

unless (condition) {
    # code to be executed if condition is false
}

Here is an example to demonstrate how unless statement works:

my $number = 5;

unless ($number == 10) {
    print "The number is not 10.\n";
}

In this example, the code inside the block will only be executed if the condition $number == 10 is false. Since $number is assigned a value of 5, the condition is false and the output will be:

The number is not 10.

Note that the unless statement can be used with an else clause to execute code when the condition is true. Here is an example:

my $number = 5;

unless ($number == 10) {
    print "The number is not 10.\n";
}
else {
    print "The number is 10.\n";
}

In this example, since the condition $number == 10 is false, the output will be:

The number is not 10.