*** empty log message ***

3 files changed, 13 insertions, 3 deletions

diff --git a/docs/tutorials/combine b/docs/tutorials/combine
index b6857c6f6a8..3076eff8ed5 100755
--- a/docs/tutorials/combine
+++ b/docs/tutorials/combine
@@ -1,4 +1,8 @@
-#!/usr/bin/perl
+
+eval '(exit $?0)' && eval 'exec perl -w -S $0 ${1+"$@"}'
+    & eval 'exec perl -S $0 $argv:q'
+    if 0;
+
 #
 # This perl script will combine a set of files into one or more HTML pages.
 #
diff --git a/docs/tutorials/fix.Makefile b/docs/tutorials/fix.Makefile
index 43557184492..7e0674aa5e9 100755
--- a/docs/tutorials/fix.Makefile
+++ b/docs/tutorials/fix.Makefile
@@ -1,4 +1,7 @@
-#!/usr/bin/perl
+
+eval '(exit $?0)' && eval 'exec perl -w -S $0 ${1+"$@"}'
+    & eval 'exec perl -S $0 $argv:q'
+    if 0;
 
 require "getopts.pl";
 &Getopts("f:o:");
diff --git a/docs/tutorials/linify b/docs/tutorials/linify
index f44747f5269..1ff82fa7bf6 100755
--- a/docs/tutorials/linify
+++ b/docs/tutorials/linify
@@ -1,4 +1,7 @@
-#!/usr/local/bin/perl
+
+eval '(exit $?0)' && eval 'exec perl -w -S $0 ${1+"$@"}'
+    & eval 'exec perl -S $0 $argv:q'
+    if 0;
 
 while( $#ARGV > -1 ) {