texlive[65116] Build/source/texk/web2c: (u)ptex: use perl instead of

[commits+takuji at tug.org]

Revision: 65116
          http://tug.org/svn/texlive?view=revision&revision=65116
Author:   takuji
Date:     2022-11-27 11:02:50 +0100 (Sun, 27 Nov 2022)
Log Message:
-----------
(u)ptex: use perl instead of sed for test scripts

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/ptexdir/yokotate.test
    trunk/Build/source/texk/web2c/uptexdir/yokotate.test

Modified: trunk/Build/source/texk/web2c/ptexdir/yokotate.test
===================================================================
--- trunk/Build/source/texk/web2c/ptexdir/yokotate.test	2022-11-27 06:52:11 UTC (rev 65115)
+++ trunk/Build/source/texk/web2c/ptexdir/yokotate.test	2022-11-27 10:02:50 UTC (rev 65116)
@@ -40,8 +40,9 @@
 
   ./ptftopl -kanji=$enc $testdir/$font.tfm ptests/x$font-$enc.pl && \
     if [ $enc = utf8 ]; then \
-      sed -i".bak" -e "y/―～∥－￠￡￢/—〜‖−¢£¬/" ptests/x$font-$enc.pl; fi && \
+      perl -i".bak" -CD -pe "use utf8; tr/―～∥－￠￡￢/—〜‖−¢£¬/" ptests/x$font-$enc.pl; fi && \
     diff $testdir/$font-$enc.pl ptests/x$font-$enc.pl && echo || exit 6
 
+
 done
 done

Modified: trunk/Build/source/texk/web2c/uptexdir/yokotate.test
===================================================================
--- trunk/Build/source/texk/web2c/uptexdir/yokotate.test	2022-11-27 06:52:11 UTC (rev 65115)
+++ trunk/Build/source/texk/web2c/uptexdir/yokotate.test	2022-11-27 10:02:50 UTC (rev 65116)
@@ -43,7 +43,7 @@
 
   ./uptftopl -kanji=$enc $testdir/$font.tfm uptests/x$font-$enc.pl && \
     if [ $enc = utf8 ]; then \
-      sed -i".bak" -e "y/―～∥－￠￡￢/—〜‖−¢£¬/" uptests/x$font-$enc.pl; fi && \
+      perl -i".bak" -CD -pe "use utf8; tr/―～∥－￠￡￢/—〜‖−¢£¬/" uptests/x$font-$enc.pl; fi && \
     diff $testdir/$font-$enc.pl uptests/x$font-$enc.pl && echo || exit 6
 
 done