perl -pi.bak -e '$_ = ( split /,/, $_, 2 )[1];' myfile.txt

##</code><code>##

perl -pi.bak -e 's/^[^,]*,//' myfile.txt