$,=" "; print grep { $i^=1 } reverse split(/ /);