in reply to Splitting without losing
split /(?<!_)(?=_)/,$string; # Using _ instead of space like your exa +mple. [download]