for(my $i = 0; $i < 10; $i++) {
    # Note to reader: Yes, could have used a trinary here, but those are hard to read
    # and therefore forbidden in my codebase
    print "$i is ";
    if(!iseven($i)) {
        print "NOT ";
    }
    print "even\n";
}

##</code><code>##

for (0 .. 9) {

    print "$_ is ";

    print "NOT " if not iseven($_);

    print "even\n";
}