$TRUE  = 1;
$FALSE = 0;

##</code><code>##

require "constants.pl";

foreach $num ( 1...5 ) {
    if ($num < 3) {
        print $TRUE,"\n";
    } else {
        print $FALSE,"\n";
    }
}

##</code><code>##

1
1
0
0
0