$a="0427320060001|39104|20020|190|2";

my ($num1, $num2,$num3,$num4,$num5)=split(/\|/,$a);

print "$num1\n$num2\n$num3\n$num4\n$num5";

prints:
0427320060001
39104
20020
190
2