my $message = 
            &check_tcp( $hname, $port,
-               "HEAD $urlpath HTTP/1.1\r\nHost: $host:$port\r\n\r\n" );
+               "HEAD $urlpath HTTP/1.1\r\nHost: $hname:$port\r\n\r\n" );
 
          if( $message =~ /HTTP\S+\s+(\d\d\d)\s.*$/m ) {
             my $code = $1;
            if( $color ne "red" ) {
               $color = "yellow"; $summary = "can't determine status code";}
          }
-         $tmessage .= "->HEAD $urlpath HTTP/1.1\nHost: $hname:$port\n$message\n";
+         $tmessage .= "->HEAD $urlpath HTTP/1.1\nHost: $hname:$port\n$message\n\n";
       }
 
    } else {
            if( $color ne "red" ) {
               $color = "yellow"; $summary = "can't determine status code";}
          }
-         $tmessage .= "->HEAD $file HTTP/1.0\n$message\n";
+         $tmessage .= "->HEAD $file HTTP/1.0\n$message\n\n";
       }
    }