#!perl -nl
do${print^s/ //}