while (<$FILE> {
 chomp;
 my ($number1,$number2,$number3,$number4) = split /\t/;
 print "$number4\n";

 if ($number4 == 1,2) {
     print "$number4 good\n";
 } else {
     print "$number4 bad\n";
 }

}

##</code><code>##

Useless use of numeric eq <==> in void context at ....
Argument "1,2" isn't numeric in numeric eq <==> at ....
1,2 good

##</code><code>##

useless use of string eq in void context at ....
1 good