/
^                       # start
  ([\$\@\*\%<])         # sigil
  (\w+)                 # name
  (?(?{$1 eq '<'}) >| ) # if the sigil is a '<', match the end;
                        # otherwise match nothing 
$                       # end
/x;