print "$1\n" if /^(\w+[\w,]+\w+)$/ && !/,,/;

##</code><code>##

print "$1\n" if /^(\w+[\w,]+\w+)$/ && !/,{2,}/;