perl -e '$_=; foreach(split){print "$_\n"}'