read SSV lines retaining backslashes!
authormirabilos <t.glaser@tarent.de>
Thu, 16 Feb 2017 12:58:20 +0000 (13:58 +0100)
committermirabilos <t.glaser@tarent.de>
Thu, 16 Feb 2017 12:58:20 +0000 (13:58 +0100)
mksh/ssv/0-README
mksh/ssv/ssvcolsz

index 6cd68d2..0d9f787 100644 (file)
@@ -11,7 +11,7 @@ Cell content is arbitrary binary except \x0A and \x1C (and NUL).
 
 SSV can easily be operated on from within shell, e.g. with:
 
-       while IFS=$'\x1C' read -A line; do
+       while IFS=$'\x1C' read -rA line; do
                for x in ${!line[*]}; do
                        print -r -- "$x=${line[x]@Q}"
                done
index b0ff582..99a58a9 100644 (file)
@@ -43,9 +43,9 @@ shift $((OPTIND - 1))
 set $utfmode
 
 cat "$@" |&
-IFS=$'\x1C' read -pA headline
+IFS=$'\x1C' read -prA headline
 set -A sizes
-while IFS=$'\x1C' read -pA line; do
+while IFS=$'\x1C' read -prA line; do
        for x in ${!line[*]}; do
                y=${#line[x]}
                ((# sizes[x] = sizes[x] < y ? y : sizes[x] ))