perl -we 'use CGI; print CGI::escape("hello, world\n"), $/'

##</code><code>##

hello%2C%20world%0A