This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add Ryan Voots to AUTHORS file
[perl5.git] / utils / pod2html.PL
index 696624f..eafd8f6 100644 (file)
@@ -18,7 +18,7 @@ chdir dirname($0);
 my $file = basename($0, '.PL');
 $file .= '.com' if $^O eq 'VMS';
 
-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";