Simply use the m//g operator in a list context, to extract multiple matches, as below:

my @info = $rawdata =~ /$Start\s*(.+?)\s*$End/g;
print join ';', @info;
[download]

If you plan on running this particular regex frequently, and performance is a concern, you may also want to consider compiling it with qr//:

my $regex = qr/$Start\s*(.+?)\s*$End/;

my @info = $rawdata =~ /$regex/g;
print join ';', @info;
[download]