wok diff dev86/stuff/com2exe @ rev 23345

updated perl-http-message (6.03 -> 6.22)
author: Hans-G?nter Theisgen
date: Tue Mar 31 09:19:52 2020 +0100 (2020-03-31)
parents: 19fbe1c329d0
     1.1 --- a/dev86/stuff/com2exe	Mon Aug 13 19:15:01 2012 +0200
     1.2 +++ b/dev86/stuff/com2exe	Tue Mar 31 09:19:52 2020 +0100
     1.3 @@ -4,7 +4,7 @@
     1.4  S=$((32+$(stat -c %s $1)))
     1.5  P=$((($S+511)/512))
     1.6  E=$((4096-(32*$P)))
     1.7 -for i in 0x5A4D $(($S%512)) $P 0 2 $E $E $((${2:-0}-16)) -2 0 256 -16 28 0 0 0
     1.8 +for i in 0x5A4D $(($S%512)) $P 0 2 $E -1 $((${2:-0}-16)) -2 0 256 -16 28 0x6C53 0x5469 0x7A61
     1.9  do printf '\\\\x%02X\\\\x%02X' $(($i&255)) $((($i>>8)&255)) | xargs echo -en
    1.10  done
    1.11  cat $1