From 2c5b04747476145d5bb0dde5f5489ad79cb0585a Mon Sep 17 00:00:00 2001
From: david <schrader@molgen.mpg.de>
Date: Thu, 17 Dec 2015 15:46:44 +0100
Subject: [PATCH] Pfad in variable gesteckt

---
 crP | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/crP b/crP
index 693e7ab..770c021 100755
--- a/crP
+++ b/crP
@@ -8,6 +8,7 @@ function usage() {
 	fi
 	return 0
 }
+p=`which perl`
 usage $1
 if [ $? = 1 ]; then 
 	echo "Skryptname eingeben: "
@@ -32,7 +33,7 @@ done
 exec 3> /dev/null
 touch ./${file} >&3
 chmod a+x ./${file} >&3
-echo '#!/usr/bin/perl -w' >> ${file}
+echo "#!${p} -w" >> ${file}
 echo ' ' >> ${file}
 echo 'use strict;' >> ${file}
 echo 'use warnings;' >> ${file}