Select Code to Download

      open FILE, "$senddir/$file"
          or die "$senddir/$file: $!"

...
          # open the socket and send $file, as before
      }
  }