$a =~ s|/browse(.*/)|$1|i;

##</code><code>##

perl -le '$_=$,=q,\,@4O,,s,^$,$\,,s,s,^,b9,s,$_^=q,$\^-]!,,print'