diff options
Diffstat (limited to 'utils/perlivp.PL')
| -rw-r--r-- | utils/perlivp.PL | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/perlivp.PL b/utils/perlivp.PL index 81f8ae428e..50d187a544 100644 --- a/utils/perlivp.PL +++ b/utils/perlivp.PL @@ -20,7 +20,7 @@ my $file = basename($0, '.PL'); $file .= '.com' if $^O eq 'VMS'; # Create output file. -open OUT,">$file" or die "Can't create $file: $!"; +open OUT, ">", $file or die "Can't create $file: $!"; print "Extracting $file (with variable substitutions)\n"; |