Hi brianjb,
I know your question has been probably answered :).
However, if I may draw your attention to some stuff in your code:

• this

  open FILE, "<hostname_check.txt" || die $!;
  [download]

  would fail to do what you intended, in case your file doesn't exists.
  It's better written as

  open ( FILE, "<hostname_check.txt" ) || die $!;
  [download]

  or

  open FILE, "<hostname_check.txt" or die $!;
  [download]

• Use lexically scoped filehanles and the 3-argument open function like so:

  open my $fh, '<',"hostname_check.txt" or die $!;
  [download]

• Also check the return of close function