From 62bd8500ebf9210652db6d1bf70f89a674c52188 Mon Sep 17 00:00:00 2001
From: Nicolas Boisselier <nicolas.boisselier@semantico.com>
Date: Fri, 1 Jul 2016 12:21:50 +0100
Subject: [PATCH] txt2ascii

---
 etc/profile.d/functions | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/etc/profile.d/functions b/etc/profile.d/functions
index ccf8a71a..a385b75e 100644
--- a/etc/profile.d/functions
+++ b/etc/profile.d/functions
@@ -132,6 +132,18 @@ unzipurl() {
    rm "$file"
 }
 
+txt2ascii() {
+  in="cat"
+  [ -z "$@" ] || in="echo \"$@\""
+  $in | perl -e '
+while (<>) {
+  for (split("",$_)) {
+    print sprintf("\%3d",ord($_)).":$_\n";
+  }
+}
+'
+}
+
 bytes2h() {
   declare in args
 
-- 
2.47.3