{for(;sub(/\B...\>/,",&"););}1