require perl, align t1mapper script with the other perl-scripts in the package

tetex/tetex.spec

@@ -38,7 +38,7 @@ Distribution: OpenPKG [BASE]
 Group:        Text
 License:      GPL
 Version:      %{V_src}
-Release:      20030723
+Release:      20030801
 
 #   package options
 %option       with_x11  no
@@ -53,7 +53,7 @@ Source3:      ftp://ftp.tex.ac.uk/tex-archive/macros/xmltex/base.zip
 Prefix:       %{l_prefix}
 BuildRoot:    %{l_buildroot}
 BuildPreReq:  OpenPKG, openpkg >= 20030103, gcc, make, infozip, flex, bison
-PreReq:       OpenPKG, openpkg >= 20030103
+PreReq:       OpenPKG, openpkg >= 20030103, perl
 %if "%{with_x11}" == "yes"
 BuildPreReq:  X11
 PreReq:       X11
@@ -131,6 +131,9 @@ AutoReqProv:  no
     #   minor fixes to the teTeX sources
     %{l_shtool} subst -e "s;\|O_SYNC;;g" libs/libwww/HTMemLog.c
     %{l_shtool} subst -e "s;strnstr;my_strnstr;g" libs/libwww/HTReader.c
+    %{l_shtool} subst \
+      -e '1s;/usr/bin/perl;/usr/bin/env perl;' \
+      texk/*/t1mapper
 
 %build
     #   configure the system by using the (wrong) paths to the temporary