changing hardcoded perl shebang to use whatever the current environment is set to use for perl; this will just affect developers since installed versions will change their shebang to the perl used to install

git-svn-id: http://svn.krangcms.com/trunk/krang@6446 689d98c0-9023-0410-9c0b-f79783857903

Author: mpeters

bench/dataset_load.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use strict;
 use warnings;

bench/elements.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl -w
 use Krang::Script;
 use Krang::Element;
 use Krang::Benchmark qw(run_benchmark);

bin/krang_addon_framework

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 

bin/krang_addon_installer

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_addon_uninstaller

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_addon_upgrade_test

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_apachectl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_backup

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_bench

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 use Getopt::Long;

bin/krang_convert_story_type

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 =head1 NAME
 

bin/krang_create_lists

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 

bin/krang_create_story

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 use File::Spec::Functions qw(catdir splitdir canonpath);

bin/krang_createdb

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_ctl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 #
 # krang_ctl     Start Krang CMS
 #

bin/krang_delete

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 use Getopt::Long;

bin/krang_deploy_templates

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 

bin/krang_egrapher

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 use Getopt::Long;

bin/krang_export

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_expunge

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use strict;
 use warnings;

bin/krang_extract_subset

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use strict;
 use warnings;

bin/krang_floodfill

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 use Getopt::Long;

bin/krang_ftpctl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_ftpd

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 use File::Spec::Functions qw(catdir catfile splitdir rel2abs canonpath);

bin/krang_import

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_info

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use strict;
 use warnings;

bin/krang_install

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 use File::Find;

bin/krang_kds_retarget

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_load_skin

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_makedist

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 use Getopt::Long;

bin/krang_objects_saved_since

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 

bin/krang_passwd

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 =head1 NAME
 

bin/krang_prune_versions

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 

bin/krang_publish

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_read_only

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 use Getopt::Long;

bin/krang_restore_instance

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 

bin/krang_schedulectl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 

bin/krang_scheduled

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use strict;
 use warnings;

bin/krang_siteserverctl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_smoke_test

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_template_diff

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use strict;
 use warnings;

bin/krang_template_patch

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use strict;
 use warnings;

bin/krang_test

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 

bin/krang_tmp_cleaner

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use strict;
 use warnings;
 

bin/krang_uninstall

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 use Getopt::Long;

bin/krang_unlock_user

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 use strict;
 use warnings;

bin/krang_unpublish

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_upgrade

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 

bin/krang_upload_media

@@ -1,4 +1,4 @@
-#!/usr/bin/perl 
+#!/usr/bin/env perl 
 use warnings;
 use strict;
 

bin/krang_upload_templates

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use strict;
 

bin/krang_useradd

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 
 =head1 NAME
 

conf/krang-preload.pl

@@ -1,4 +1,5 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl
+use warnings;
 
 ##########################################
 ####  MODULES TO PRE-LOAD INTO KRANG  ####

docs/bin/hr.pl

@@ -1,3 +1,3 @@
-#!/usr/bin/perl -p
+#!/usr/bin/env perl -p
 # <hr> removal
 s/<HR>//g;

docs/bin/href.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl -p 
+#!/usr/bin/env perl -p 
 
 # translate HREF(foo|bar) into <a href="bar">foo</a>.  pod2html should
 # provide this, but it doesn't unless you want to use a full URL.

docs/bin/items.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl -p
+#!/usr/bin/env perl -p
 
 # process =item foo into =item *\nfoo, to make nicer looking ordered
 # lists with less work.

docs/bin/lib_docs.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl -w
 use strict;
 
 use File::Find qw(find);

docs/bin/links.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl -p
+#!/usr/bin/env perl -p
 
 # fixup links to modules
 s!<A[^>]+>\s*the\s+(\S+)\s+manpage\s*</A>!find_link($1)!ige;

docs/bin/merge_pre.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl -w
 
 # merge adjacent <pre> blocks so that code with blank lines looks right
 

docs/bin/pod2html.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl -w
 $in = shift;
 $out = shift;
 if (-e $out and -e $in and (stat($out))[9] >= ((stat($in))[9])) {

docs/bin/script_docs.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/env perl -w
 use strict;
 
 open POD, ">scripts.pod" or die $!;

htdocs/about.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use Krang::ClassFactory qw(pkg);
 use Krang::ClassLoader 'CGI::About';

htdocs/bug.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use CGI;
 use Krang::ClassFactory qw(pkg);

htdocs/category.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use Krang::ClassFactory qw(pkg);
 use Krang::ClassLoader 'ErrorHandler';

htdocs/contributor.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use Krang::ClassFactory qw(pkg);
 

htdocs/debug.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use Krang::ClassFactory qw(pkg);
 use Krang::ClassLoader 'CGI::Debug';

htdocs/desk.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use Krang::ClassFactory qw(pkg);
 use Krang::ClassLoader 'ErrorHandler';

htdocs/desk_admin.pl

@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/env perl
 use warnings;
 use Krang::ClassFactory qw(pkg);
 use Krang::ClassLoader 'ErrorHandler';