s#<--/--a8300-->.*?<--/a8300-->.##isg $_; 

##</code><code>##

s#<--/--a8300-->.*?<--/a8300-->.##isg; 

##</code><code>##

$string=~s/from/to/opts;