Try to protect the block

my $line = <$rh>
$incoming_server_data .= $line;
parse(\$incoming_server_data);
[download]

with a  if($rh == $sock) block