awk '{
res="";
if ( length($0) <=3 ){
    res=$0
}else{
    i=length($0)%3
    i=i==0?3:i
    res=substr($0, 1, i)
    for (i=i+1;i+2<=length($0);i+=3) res=res","substr($0, i, 3);
}
print res
}' $1