perl -pe 'while (s/( .*\w)(\w)/$1, $2/) { }; s/ / :: /; s/^\w+$/$& :: /' spi2006.for-compute