#!/lang/perl -p
s/  /\n/g;