http://www.perlmonks.org?node_id=764215


in reply to Match the starting \>

You do not have to test the appearance of < and > bevor deleting them.

if (/</) { s/<//; }

does nothing different to

s/<//;