There are inconstancies between your input and output data. I can't determine the rule for handling white space so you will have to figure that much out for yourself.

The key to your main problem is split. Something like:

    my ($first, @fields) = split ';', $line;
[download]

splits the string in $line into a number of elements in a list then assigns the first element to $first with the rest ending up in @fields.

Note that we like to see what you have tried and like to be told if you are working on homework so that we can tailor our help to your situation.