use strict;
use warnings;

my $number_one=1;
foreach my $int ( 1 .. 600 ) {
    my $number = $int / $int;
    next if $number == $number_one;
    warn "$int / $int != 1 (== $number)\n";
}