split \|, $line;

Huh? Try:  split /\|/, $line;

You forgot your quote-like regexp characters.

Or to answer the OP's question:

my $delimiter = quotemeta( '|' );
my @array = split /$delimiter/, $line;
[download]