1998-09-15 17:23:32 +00:00
|
|
|
*** adcomplain.pl.orig Tue Sep 15 21:12:13 1998
|
|
|
|
--- adcomplain.pl Tue Sep 15 21:14:56 1998
|
1997-09-13 14:04:22 +00:00
|
|
|
***************
|
1997-11-08 15:50:27 +00:00
|
|
|
*** 1,3 ****
|
|
|
|
--- 1,4 ----
|
1998-09-16 11:45:01 +00:00
|
|
|
+ #!%PERL5%
|
1997-11-08 15:50:27 +00:00
|
|
|
#! /bin/sh -- # -*- perl -*-
|
|
|
|
# first line invokes sh. Some systems may need to refer to perl directly, i.e.:
|
1997-09-13 14:04:22 +00:00
|
|
|
|
|
|
|
***************
|
1997-11-08 15:50:27 +00:00
|
|
|
*** 7,14 ****
|
|
|
|
# allows perl to be _anywhere_ in the user's path. The intent is to reduce
|
|
|
|
# the need to edit this file.
|
1997-09-13 14:04:22 +00:00
|
|
|
|
1997-11-08 15:50:27 +00:00
|
|
|
! eval 'exec perl $0 ${1+"$@"}'
|
|
|
|
! if 0; # tee hee! This is on a separate line, so /bin/sh never sees it.
|
1997-09-13 14:04:22 +00:00
|
|
|
|
1998-09-15 17:23:32 +00:00
|
|
|
# use strict;
|
|
|
|
|
1997-11-08 15:50:27 +00:00
|
|
|
--- 8,15 ----
|
|
|
|
# allows perl to be _anywhere_ in the user's path. The intent is to reduce
|
|
|
|
# the need to edit this file.
|
1997-09-13 14:04:22 +00:00
|
|
|
|
1997-11-08 15:50:27 +00:00
|
|
|
! #eval 'exec perl $0 ${1+"$@"}'
|
|
|
|
! #if 0; # tee hee! This is on a separate line, so /bin/sh never sees it.
|
1997-09-13 14:04:22 +00:00
|
|
|
|
1998-09-15 17:23:32 +00:00
|
|
|
# use strict;
|
|
|
|
|