in reply to Hazardous characters filter

It does not seem to do any replacement for me:
DB<1> $_ = "this is not OK < but this is ok <url>"; DB<2> s/<|>//g unless /(\<\burl\b\>)/i; DB<3> p $_ this is not OK < but this is ok <url>