Merge pull request #10 from candlerb/candlerb/htmlescape

Escape angle brackets in HTML
p-alik · Nov 14, 2018 · cec68e8 · cec68e8
2 parents 5b73861 + 3604018
commit cec68e8
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/libexec/AbuseWhois.pm b/libexec/AbuseWhois.pm
@@ -381,7 +381,7 @@ sub Reverse_name($) {
 	my $hostname = scalar gethostbyaddr(inet_pton($af, $ip), $af);
 
 	if ( !defined $hostname ) {
-		$hostname = '<not found>';
+		$hostname = '&lt;not found&gt;';
 	}
 
 	return $hostname;
@@ -743,7 +743,7 @@ sub Query($$) {
 	}
 
 	my $hostname = Reverse_name($ip);
-	print $sock "<b>$ip -> $hostname</b>\n";
+	print $sock "<b>$ip -&gt; $hostname</b>\n";
 	print $sock "<pre>\n";
 
 	my ($net, $org_id) = ARNIN_stage1($ip);