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