DB<1> $_ = "this is not OK < but this is ok "; DB<2> s/<|>//g unless /(\<\burl\b\>)/i; DB<3> p $_ this is not OK < but this is ok