The answer appears so many times in your post that I wonder if you are testing the community to see how nice we can be :)

It's perlfunc:split of course. Pass it a regular expression and your string and you'll get the array of choice back.

@ary = split(/|/, $string);

Go read the documentation though, split does other nice tricks too.