perl regex – everything before

This will find everything before the < character.

^[^<]+<\s*
Advertisements