Keep perl style checker happy
authorAndrew Dunstan <[email protected]>
Tue, 5 Feb 2019 20:16:55 +0000 (15:16 -0500)
committerAndrew Dunstan <[email protected]>
Thu, 19 Jan 2023 16:54:06 +0000 (11:54 -0500)
It doesn't like code before "use strict;".

(cherry picked from commit ed2c2d063bd110f299211611b72a5dbe07a4d7be)

src/backend/catalog/genbki.pl

index 2d96fbe5ef83563416f6ce3be941bb95f976ea49..943f7e467f8a83ca36179ad6477833fe9b4ccc98 100644 (file)
 #
 #----------------------------------------------------------------------
 
+use strict;
+use warnings;
+
 use File::Basename;
 use File::Spec;
 BEGIN  { use lib File::Spec->rel2abs(dirname(__FILE__)); }
 
 use Catalog;
 
-use strict;
-use warnings;
-
 my @input_files;
 our @include_path;
 my $output_path = '';