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


in reply to Split at multiple delimiters and get the delimiter

Your question has been answered; however, I suggest using a character class rather than alternating single characters: split /([:%;])/.

In Section Seekers of Perl Wisdom