Right, and then in perl5:

    sum map $_**2, grep !($_ % 2), 1, 2, 3, 4

I find the python and perl versions more aesthetically pleasing than the ruby one, tbh.