From 38626ab9b849bc5b855c438226ad7b0454a8c706 Mon Sep 17 00:00:00 2001
From: Nicolas Boisselier <nicolas.boisselier@gmail.com>
Date: Wed, 13 May 2020 20:37:13 +0200
Subject: [PATCH] /opt/nb/bin/ascii

---
 bin/ascii               | 18 ++++++++++++++++++
 etc/profile.d/functions | 12 ------------
 2 files changed, 18 insertions(+), 12 deletions(-)
 create mode 100755 bin/ascii

diff --git a/bin/ascii b/bin/ascii
new file mode 100755
index 00000000..6b7ed775
--- /dev/null
+++ b/bin/ascii
@@ -0,0 +1,18 @@
+#!/bin/sh
+ascii() {
+
+	if [ ! -t 0 ]; then
+		cat | perl -ne 'for (split("",$_)) { print sprintf("%3d",ord($_)).":$_\n"; }'
+	elif [ -n "$*" ]; then
+		perl -ne 'for (split("",$_)) { print sprintf("%3d",ord($_)).":$_\n"; }' $@
+	else
+		perl -e 'binmode(STDOUT, ":utf8"); for(32..255){ print "$_:".chr($_)."\n"; }'
+	fi
+
+}
+
+if [ "$#" = 1 ]; then
+	ascii | awk -F: '$1=="'$1'"{print $2}'
+else
+	ascii
+fi
diff --git a/etc/profile.d/functions b/etc/profile.d/functions
index 2b9816f2..1c2d178b 100755
--- a/etc/profile.d/functions
+++ b/etc/profile.d/functions
@@ -263,18 +263,6 @@ env_add_path() {
 	[ -z "$env_value" ] || echo "$env_value"
 }
 
-ascii() {
-
-	if [ ! -t 0 ]; then
-		cat | perl -ne 'for (split("",$_)) { print sprintf("%3d",ord($_)).":$_\n"; }'
-	elif [ -n "$*" ]; then
-		perl -ne 'for (split("",$_)) { print sprintf("%3d",ord($_)).":$_\n"; }' $@
-	else
-		perl -e 'binmode(STDOUT, ":utf8"); for(32..255){ print "$_:".chr($_)."\n"; }'
-	fi
-
-}
-
 psmem() {
 	local ps=`ps ax -O rss 2>/dev/null`
 	echo "$ps"| awk "\
-- 
2.47.3