From 6b6eb79c5c5eacbb574857654a5057a2783d8ced Mon Sep 17 00:00:00 2001
From: Stefan `Sec` Zehl <sec@42.org>
Date: Wed, 30 May 2012 20:51:07 +0200
Subject: [PATCH] Allow more chars in listen-log.pl

---
 tools/reader/listen-log.pl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/tools/reader/listen-log.pl b/tools/reader/listen-log.pl
index 5176554..367e997 100755
--- a/tools/reader/listen-log.pl
+++ b/tools/reader/listen-log.pl
@@ -26,7 +26,8 @@ while (1){
     ($port, $hisiaddr) = sockaddr_in($hispaddr);
 #    $host = gethostbyaddr($hisiaddr, AF_INET);
     $host=join(".",unpack("CCCC",$hisiaddr));
-    $buf =~ y!a-zA-Z0-9.:,; _()[]{}?-!!cd;
+    chomp($buf);
+    $buf =~ y!a-zA-Z0-9.:,; _()[]{}<>/?-!!cd;
     print substr(scalar(localtime),11,8)," ",$host," ",$buf,"\n";
 };