Well, if that's exactly how you want the output:

{
  local $/;
  local $_ = <DATA>;
  s/,/\n/g;
  s/-/ - /g;
  print
}
[download]

Or

open P, ' | perl -laF, -ne "s/-/ - /, print for @F" ';
print P <DATA>;
close P;
[download]

(Some things are done more succinctly on the command line.)