From 93a881b4408a625b3dc747f774c650e7e6f98982 Mon Sep 17 00:00:00 2001 From: Rob Austein Date: Tue, 12 Sep 2006 02:25:57 +0000 Subject: Plugged preexisting memory leak in "openssl ca". svn path=/scripts/generate-testrepo.pl; revision=263 --- scripts/generate-testrepo.pl | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'scripts/generate-testrepo.pl') diff --git a/scripts/generate-testrepo.pl b/scripts/generate-testrepo.pl index f7714031..df57243d 100644 --- a/scripts/generate-testrepo.pl +++ b/scripts/generate-testrepo.pl @@ -9,13 +9,17 @@ my %parent; my @ordering; my %hashes; +my $openssl = "../../openssl/trunk/apps/openssl"; my $subdir = "apacheca"; my $passwd = "fnord"; my $keybits = 2048; my $verbose = 0; +my $debug = 1; sub openssl { - !system("openssl", @_) + print(STDERR join(" ", qw(+ openssl), @_), "\n") + if ($debug); + !system($openssl, @_) or die("openssl @_ returned $?\n"); } -- cgit v1.2.3