Help for this page
#!/usr/bin/perl $|=1; ... } return ($err,\@data); }
use strict; use Coro; ... foreach my $task (@ftasks) { $task->join(); } return ($err,\@data); }