From 6925594dd7464b95a96d90067ab508c6e82ad58a Mon Sep 17 00:00:00 2001
From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Fri, 30 Sep 2016 11:21:12 +0100
Subject: [PATCH] resolve

---
 etc/profile.d/net.sh | 13 +++++++++++++
 1 file changed, 13 insertions(+)

diff --git a/etc/profile.d/net.sh b/etc/profile.d/net.sh
index f0f5496d..c4c6c79f 100644
--- a/etc/profile.d/net.sh
+++ b/etc/profile.d/net.sh
@@ -1,3 +1,16 @@
+resolve() {
+  (
+    if [ -t 0 ]; then
+      while [ $# -gt 0 ]; do
+        printf '%s\n' "$1"
+        shift
+      done
+    else
+      cat
+    fi
+  ) | perl -MSocket -pe 's/(\b)(\d+(?:\.\d+){3})(\b)/$1.gethostbyaddr(inet_aton($2),AF_INET).$3/ge;'
+}
+
 mask2cdr ()
 {
    # Assumes there's no "255." after a non-255 byte in the mask
-- 
2.47.3