Standardize order of use strict and use warnings in Perl code

The standard order in PostgreSQL and other code is use strict first,
but some code was uselessly inconsistent about this.

diff --git a/doc/src/sgml/generate-errcodes-table.pl b/doc/src/sgml/generate-errcodes-table.pl
index 9a1886059b2bfc43d995bb512f2b80346536f5b2..66a3ee00298a15bc4bb97ce6c97d70ef403826c1 100644 (file)
--- a/doc/src/sgml/generate-errcodes-table.pl
+++ b/doc/src/sgml/generate-errcodes-table.pl
@@ -3,8 +3,8 @@
 # Generate the errcodes-table.sgml file from errcodes.txt
 # Copyright (c) 2000-2020, PostgreSQL Global Development Group
 
-use warnings;
 use strict;
+use warnings;
 
 print
   "<!-- autogenerated from src/backend/utils/errcodes.txt, do not edit -->\n";

diff --git a/src/backend/parser/check_keywords.pl b/src/backend/parser/check_keywords.pl
index 3862db072780c8860cf7d43426b1054a96234fd4..e6c6c98fb5ec75d3877b311f16127130bacab6d9 100644 (file)
--- a/src/backend/parser/check_keywords.pl
+++ b/src/backend/parser/check_keywords.pl
@@ -6,8 +6,8 @@
 # src/backend/parser/check_keywords.pl
 # Copyright (c) 2009-2020, PostgreSQL Global Development Group
 
-use warnings;
 use strict;
+use warnings;
 
 my $gram_filename   = $ARGV[0];
 my $kwlist_filename = $ARGV[1];

diff --git a/src/backend/storage/lmgr/generate-lwlocknames.pl b/src/backend/storage/lmgr/generate-lwlocknames.pl
index ca54acdfb0f88b8cbc18d070481a0e6adb94dbe9..39cb97f5c3d95c83f59bcb6182c84579aaf91ad4 100644 (file)
--- a/src/backend/storage/lmgr/generate-lwlocknames.pl
+++ b/src/backend/storage/lmgr/generate-lwlocknames.pl
@@ -3,8 +3,8 @@
 # Generate lwlocknames.h and lwlocknames.c from lwlocknames.txt
 # Copyright (c) 2000-2020, PostgreSQL Global Development Group
 
-use warnings;
 use strict;
+use warnings;
 
 my $lastlockidx = -1;
 my $continue    = "\n";

diff --git a/src/backend/utils/generate-errcodes.pl b/src/backend/utils/generate-errcodes.pl
index 868a163578d7d6d892d0d346a9d2eb3d37fbf0a7..1a071fbb1f43c1cd5dfa6f1413ac624396915ada 100644 (file)
--- a/src/backend/utils/generate-errcodes.pl
+++ b/src/backend/utils/generate-errcodes.pl
@@ -3,8 +3,8 @@
 # Generate the errcodes.h header from errcodes.txt
 # Copyright (c) 2000-2020, PostgreSQL Global Development Group
 
-use warnings;
 use strict;
+use warnings;
 
 print
   "/* autogenerated from src/backend/utils/errcodes.txt, do not edit */\n";

diff --git a/src/pl/plpgsql/src/generate-plerrcodes.pl b/src/pl/plpgsql/src/generate-plerrcodes.pl
index f74dd0ef03f8cab90f8503ce22e674a39df42520..32d251c8c2f19c424c135573213a29adb1a9c4a0 100644 (file)
--- a/src/pl/plpgsql/src/generate-plerrcodes.pl
+++ b/src/pl/plpgsql/src/generate-plerrcodes.pl
@@ -3,8 +3,8 @@
 # Generate the plerrcodes.h header from errcodes.txt
 # Copyright (c) 2000-2020, PostgreSQL Global Development Group
 
-use warnings;
 use strict;
+use warnings;
 
 print
   "/* autogenerated from src/backend/utils/errcodes.txt, do not edit */\n";

diff --git a/src/pl/plpython/generate-spiexceptions.pl b/src/pl/plpython/generate-spiexceptions.pl
index d7afb8516dedbf9f7a97e0054415e88317cb0d18..fba603e9ec8971e8a51754050a8e984af7beea94 100644 (file)
--- a/src/pl/plpython/generate-spiexceptions.pl
+++ b/src/pl/plpython/generate-spiexceptions.pl
@@ -3,8 +3,8 @@
 # Generate the spiexceptions.h header from errcodes.txt
 # Copyright (c) 2000-2020, PostgreSQL Global Development Group
 
-use warnings;
 use strict;
+use warnings;
 
 print
   "/* autogenerated from src/backend/utils/errcodes.txt, do not edit */\n";

diff --git a/src/pl/tcl/generate-pltclerrcodes.pl b/src/pl/tcl/generate-pltclerrcodes.pl
index 59ea2baab7edf15fdd5fcadbbf764fd74fc3affb..43417a4bb4c2111f313b82a2d96b44fd734a23cd 100644 (file)
--- a/src/pl/tcl/generate-pltclerrcodes.pl
+++ b/src/pl/tcl/generate-pltclerrcodes.pl
@@ -3,8 +3,8 @@
 # Generate the pltclerrcodes.h header from errcodes.txt
 # Copyright (c) 2000-2020, PostgreSQL Global Development Group
 
-use warnings;
 use strict;
+use warnings;
 
 print
   "/* autogenerated from src/backend/utils/errcodes.txt, do not edit */\n";