Description: patch Perl interpreter as required by Polich 5.1
 Perl Script Magic - http://www.debian.org/doc/packaging-manuals/perl-policy/ch-programs.html#s-hash_bang
Author: Laszlo Kajan <lkajan@rostlab.org>
--- a/scripts/addss.pl
+++ b/scripts/addss.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/env perl
+#!/usr/bin/perl
 #
 # addss.pl
 # Add PSIPRED secondary structure prediction (and DSSP annotation) to an MSA or HMMER file.
--- a/scripts/create_profile_from_hhm.pl
+++ b/scripts/create_profile_from_hhm.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/env perl
+#!/usr/bin/perl
 # 
 # create_profile_from_hhm.pl 
 # Create a profile (.prf) from a given HHM file
--- a/scripts/create_profile_from_hmmer.pl
+++ b/scripts/create_profile_from_hmmer.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/env perl
+#!/usr/bin/perl
 #
 # create_profile_from_hmmer.pl 
 # Create a profile (.prf) from a given HMMER/HMMER3 file
--- a/scripts/hhmakemodel.pl
+++ b/scripts/hhmakemodel.pl
@@ -1,4 +1,4 @@
-#! /usr/bin/env perl
+#!/usr/bin/perl
 #
 # hhmakemodel.pl 
 # Generate a model from an output alignment of hhsearch. 
--- a/scripts/multithread.pl
+++ b/scripts/multithread.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/env perl
+#!/usr/bin/perl
 #
 # multithread.pl: 
 # Run a command with different file names as arguments on multiple threads in parallel 
--- a/scripts/pdb2fasta.pl
+++ b/scripts/pdb2fasta.pl
@@ -1,4 +1,4 @@
-#! /usr/bin/env perl
+#!/usr/bin/perl
 #
 # pdb2fasta.pl - generate FASTA nonredundant sequence file from SEQRES records of globbed pdb files.
 
--- a/scripts/pdbfilter.pl
+++ b/scripts/pdbfilter.pl
@@ -1,4 +1,4 @@
-#! /usr/bin/env perl
+#!/usr/bin/perl
 # pdbfilter.pl - Read pdb or SCOP sequences from infile and write representative set of sequences to outfile
 
 #
--- a/scripts/reformat.pl
+++ b/scripts/reformat.pl
@@ -1,4 +1,4 @@
-#! /usr/bin/env perl
+#!/usr/bin/perl
 
 # reformat.pl 
 # Reformat a multiple alignment file
--- a/scripts/renumberpdb.pl
+++ b/scripts/renumberpdb.pl
@@ -1,4 +1,4 @@
-#!/usr/bin/env perl
+#!/usr/bin/perl
 # renumberpdb.pl - generate a PDB file with renumbered indices that match residue indices in input sequence
 # Usage:   renumberpdb.pl [options] infile [outfile] 
 # Example: renumberpdb.pl d1hz4a_.a3m d1hz4a_.pdb
--- a/scripts/splitfasta.pl
+++ b/scripts/splitfasta.pl
@@ -1,4 +1,4 @@
-#! /usr/bin/env perl
+#!/usr/bin/perl
 # splitfasta.pl 
 # Split a file with multiple, FASTA formatted sequences into many single-sequence FASTA files
 #
