while(<DATA>)
{
   /(\w+)/g
   print "$1,$2,$3";
}
__DATA__
word1 word2 word3
..     ..    ..