From dd015edf96cbbb4ca764ee067c13b4b0002524ec Mon Sep 17 00:00:00 2001
From: Royce Williams <royce@techsolvency.com>
Date: Sun, 23 Jul 2023 11:42:24 -0800
Subject: [PATCH] use actual hex, oops

---
 src/tmesis.pl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/tmesis.pl b/src/tmesis.pl
index e95299b..0d62293 100755
--- a/src/tmesis.pl
+++ b/src/tmesis.pl
@@ -54,7 +54,7 @@
       if ($word_buf[$word_pos] =~ m/[\x00-\x19\x7f-\xff]/)
       {
         # ... escape it in rule syntax.
-        $charspec = '\x' . ord($word_buf[$word_pos]);
+        $charspec = '\x' . unpack("H*", $word_buf[$word_pos]);
       }
       else
       {