You could ask split to give you the delimeters. To do that, wrap your delimiter in parens:

my @result = split( /(\|)/ );
[download]

Then you get (for example):

[ 'A', '|', 'B', '|', '|', '|' ]
[download]

This may or may not be easier to handle than other solutions already given.

Phil