Strip protocol from title's source URL

Helps avoid other poorly configured bots

1 files changed, 3 insertions, 0 deletions

diff --git a/idalius.pl b/idalius.pl
index 1a81917..c0782ff 100755
--- a/idalius.pl
+++ b/idalius.pl
@@ -96,6 +96,9 @@ sub url_get_title
 	my $shorturl = $url;
 	$shorturl = (substr $url, 0, $config{url_len}) . "…" if length ($url) > $config{url_len};
 
+	# remove http(s):// to avoid triggering other poorly configured bots
+	$shorturl =~ s,^https?://,,g;
+
 	my $composed_title = "$title ($shorturl)";
 	return $composed_title;
 }