Select Code to Download

for my $fh ($sel->can_read())
{
...
  }
  ...
}

 for (keys(%hash)) {
   if ($fh == $_) { ... }
 }