1
0
mirror of https://github.com/postgres/postgres.git synced 2025-08-27 07:42:10 +03:00

Fix perlcritic warnings

This commit is contained in:
Peter Eisentraut
2017-04-17 13:49:04 -04:00
parent bf2a691e02
commit 0e8286d354
2 changed files with 5 additions and 5 deletions

View File

@@ -18,9 +18,9 @@ my $output_file = $ARGV[1];
my $output_base = basename($output_file);
# Open the input and output files
open my $INPUT, $input_file
open my $INPUT, '<', $input_file
or die "Could not open input file $input_file: $!";
open my $OUTPUT, "> $output_file"
open my $OUTPUT, '>', $output_file
or die "Could not open output file $output_file: $!\n";
# Print header of output file.