my ($match) = $string =~ /(<ab>|ab)/;

##</code><code>##

my ($match) = $string =~ /(?!<ab[^>]|[^<]ab>)<?(ab)>?/