sign fix in decimal1()

* Use the correct unpack format "c" for signed char * Add a comment to clarify why some ascii character names have an embedded space
briandfoy · Jan 23, 2025 · cdb391c · cdb391c
1 parent c3cd548
commit cdb391c
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/bin/od b/bin/od
@@ -44,6 +44,7 @@ my %charescs = (
     92 => ' \\\\',
 );
 
+# embedded space allows formatting without sprintf
 my %charname = (
     0  => 'nul',
     1  => 'soh',
@@ -295,7 +296,7 @@ sub octal1 {
 }
 
 sub decimal1 {
-    @arr = unpack 'C*', $data;
+    @arr = unpack 'c*', $data;
     $strfmt = '%4d ' x (scalar @arr);
 }