$/+=<>;s/ //,?(. *){$/}\S*?,print$&for<>