DB<84> print join "|",'a<c1<c2' =~ /(.+?)<(c.)?/ # ok
a|c1

  DB<85> print join "|",'a<b1<b2' =~ /(.+?)<(c.)?/ # ok
a|

  DB<86> print join "|",'a<b1<c2' =~ /(.+?)<(c.)?/ # oops
a|