foreach (@nums) { ($_ % 2) and push @odds, $_ }