Refactor file writing - introduce template driven file writing
[openssl.git] / tools / c_rehash.in
index 834de780ca247d6d5eaeccd993ffe4de2dad068d..912618c2300e10422f369bb24e6286b64496e0c3 100644 (file)
@@ -1,10 +1,10 @@
-#!/usr/local/bin/perl
+#!{- $config{perl} -}
 
 # Perl c_rehash script, scan all files in a directory
 # and add symbolic links to their hash values.
 
-my $dir;
-my $prefix;
+my $dir = {- quotify1($config{openssldir}) -};
+my $prefix = {- quotify1($config{prefix}) -};
 
 my $errorcount = 0;
 my $openssl = $ENV{OPENSSL} || "openssl";