Improve heartbeats coding style
[openssl.git] / tools / c_rehash.in
index 834de780ca247d6d5eaeccd993ffe4de2dad068d..dc66a9d9625872a2eeb28ad364f2af5546721b84 100644 (file)
@@ -1,10 +1,12 @@
-#!/usr/local/bin/perl
+#!{- $config{perl} -}
+
+# {- join("\n# ", @autowarntext) -}
 
 # 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";