New upstream version 20230309

[perltidy.git] / pm2pl

diff --git a/pm2pl b/pm2pl
index 699293639bf78381ecd44e2bdc93eb4fe50adcd2..3e3af2c667d0c27869fc198701bbb543edfa8672 100755 (executable)
--- a/pm2pl
+++ b/pm2pl
@@ -73,7 +73,7 @@ my $VERSION = get_version("lib/Perl/Tidy.pm");
 my $outfile = "perltidy-$VERSION.pl";
 if ( $Opts{o} ) { $outfile = $Opts{o} }
 my $fh_out;
-open( $fh_out,, ">", $outfile ) or die "can't open file '$outfile' : $!\n";
+open( $fh_out, ">", $outfile ) or die "can't open file '$outfile' : $!\n";
 print "Creating standalone perltidy script '$outfile' ....";
 
 # first, open the script and copy the first (hash-bang) line