mirror of
https://github.com/curl/curl.git
synced 2026-04-20 08:21:14 +03:00
Use the 3-argument open for compatibility with older perls
This commit is contained in:
parent
a83870ef9d
commit
091c52fef7
1 changed files with 1 additions and 1 deletions
|
|
@ -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+//;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue