Select Code to Download

#!/usr/bin/perl
$|=1;
...
    }
    return ($err,\@data);
}

use strict;
use Coro;
...
    foreach my $task (@ftasks) {        $task->join();    }
    return ($err,\@data);
}