From: Dan Fandrich <dan@coneharvesters.com>
Date: Fri, 19 Nov 2010 23:27:28 +0000 (-0800)
Subject: Use the 3-argument open for compatibility with older perls
X-Git-Tag: curl-7_21_3~52
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=091c52fef7636020522334f7eff58701f5fd8489;p=curl

Use the 3-argument open for compatibility with older perls
---

diff --git a/tests/symbol-scan.pl b/tests/symbol-scan.pl
index 2f9ce3507..f12660339 100644
--- a/tests/symbol-scan.pl
+++ b/tests/symbol-scan.pl
@@ -35,7 +35,7 @@ my $verbose=0;
 my $summary=0;
 my $misses=0;
 
-open H_IN, "-|", "cpp", $h;
+open H_IN, "-|", "cpp " . $h;
 while ( <H_IN> ) {
     if ( /enum\s+(\S+\s+)?{/ .. /}/ ) {
         s/^\s+//;