map { $_ * 2 } grep { $_ % 2 == 0 } (1,2,3,4,5,6)