for(0..10){
    print "$_ is ", qw(even odd)[$_ % 2],"\n";
}