#!/usr/bin/sh
perl -MList::Util=sum -E'say sum grep { not $_ % 2 } 1 .. 100'