--- reconfig.old	2010-11-18 13:40:58.000000000 +0100
+++ reconfig	2010-11-18 13:43:50.000000000 +0100
@@ -56,18 +56,9 @@
 	next if (! -d $dir);
 	while (<$dir/perl5* $dir/perl*>) {
 		if (-x $_) {
-			$perl_version=`($_ -v 2> /dev/null) |
-				awk '
-				    /This is perl, version 5/ { print $NF }
-				    /This is perl, v5/ { print $4 }
-				'`;
-			if ($perl_version) {
-				$PERL=$_;
-				$pflag="1";
-				last;
-				}
+			$PERL=$_;
+			$pflag="1";
 			}
-			last if $pflag;
 		}
 	last if $pflag;
 	}
