for(1 .. 100) {         
    print if $_ < 50; 
}