Blob Blame History Raw
diff -up openssl-fips-0.9.8e/util/perlpath.pl.perlfind openssl-fips-0.9.8e/util/perlpath.pl
--- openssl-fips-0.9.8e/util/perlpath.pl.perlfind	2013-07-17 11:47:59.977820958 +0200
+++ openssl-fips-0.9.8e/util/perlpath.pl	2013-07-17 12:12:37.997614805 +0200
@@ -4,10 +4,10 @@
 # line in all scripts that rely on perl.
 #
 
-require "find.pl";
+use File::Find;
 
 $#ARGV == 0 || print STDERR "usage: perlpath newpath  (eg /usr/bin)\n";
-&find(".");
+find(\&wanted, ".");
 
 sub wanted
 	{