Select Code to Download

async sub fetch {
my $loop = IO::Async::Loop->new;
...
  ...
  return $processed_data
}

# main
use ModuleA;
...
   my $dataB = ModuleB->new()->give_me_data();
   return ...
}