Mark experimental smartmach feature as enabled to suppress warnings in perl 5.18+.

This doesn't mitigate the fact that smartmatch is now considered experimental,
but use of smartmatch in this script is limited to simple given/when with string literals.

diff --git a/pgbouncer_follower.pl b/pgbouncer_follower.pl
index c6b6ede728b3cdd46ebb2caace9bedc6e63fa6ae..aa55bcba58d348d7851f70455c95e615223b9976 100755 (executable)
--- a/pgbouncer_follower.pl
+++ b/pgbouncer_follower.pl
@@ -22,6 +22,7 @@
 
 use strict;
 use warnings;
+use experimental 'smartmatch';
 use DBI;
 use v5.10.1;
 use Getopt::Long qw/GetOptions/;