7.1. Numerical Comparison Operators

Perl supplies the user with 6 numerical comparison operators which test for the comparison of two numbers. They are:

`$x == $y`	`$x` and `$y` are equal.
`$x > $y`	`$x` is greater than `$y`
`$x < $y`	`$x` is lesser than `$y`
`$x >= $y`	`$x` is greater or equal to `$y`
`$x <= $y`	`$x` is lesser or equal to `$y`
`$x != $y`	`$x` is not equal to `$y`

Those operators can be used inside conditionals and also outside, as part of a normal expression. The following program prints all the numbers between 1 and 100 that are not divisible by 3:

for $n (1 .. 100)
{
    if (($n % 3) != 0)
    {
        print $n, "\n";
    }
}