s/<(?>[^>'"]+|"[^"]*"|'[^']*')*>//g;

##</code><code>##

$_ = '<foo attr="heh>hoh">bar</foo>';