even shorter: grep { $_ % 2 == 0 } 1..5;