asynchronous processing - Simple way to monitor a multiple URLDownloadSubmit calls?

I have a list of download jobs (e.g. {{url, filename} ...}) to do:jobs = Table[{"", "~/Downloads/" <> ToString[i] <> ".jpg"}, {i, 5}]Clearly the ProgressIndicator here does not show the percent completion of the asynchronous tasks:Monitor[Table[URLDownloadSubmit @@ jobs[[i]], {i, 5}], ProgressIndicator[Dynamic[i], {0, 5}]]So I'm looking for a nice way to monitor the total progress of all tasks created in a call like this:Scan[URLDownloadSubmit@@#&, jobs]without resorting...Read more