Bug 996893: Perl 5.18 and newer throw tons of warnings about deprecated modules

Bugzilla.pm

@@ -9,6 +9,7 @@ package Bugzilla;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 # We want any compile errors to get to the browser, if possible.
 BEGIN {

Bugzilla/Attachment.pm

@@ -9,6 +9,7 @@ package Bugzilla::Attachment;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 =head1 NAME
 

Bugzilla/Attachment/PatchReader.pm

@@ -9,6 +9,7 @@ package Bugzilla::Attachment::PatchReader;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Config;
 use IO::Select;

Bugzilla/Auth.pm

@@ -9,6 +9,8 @@ package Bugzilla::Auth;
 
 use 5.10.1;
 use strict;
+use warnings;
+
 use fields qw(
     _info_getter
     _verifier

Bugzilla/Auth/Login.pm

@@ -9,6 +9,8 @@ package Bugzilla::Auth::Login;
 
 use 5.10.1;
 use strict;
+use warnings;
+
 use fields qw();
 
 # Determines whether or not a user can logout. It's really a subroutine,

Bugzilla/Auth/Login/APIKey.pm

@@ -9,6 +9,7 @@ package Bugzilla::Auth::Login::APIKey;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use base qw(Bugzilla::Auth::Login);
 

Bugzilla/Auth/Login/CGI.pm

@@ -9,6 +9,7 @@ package Bugzilla::Auth::Login::CGI;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Auth::Login);
 use constant user_can_create_account => 1;

Bugzilla/Auth/Login/Cookie.pm

@@ -9,6 +9,7 @@ package Bugzilla::Auth::Login::Cookie;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use base qw(Bugzilla::Auth::Login);
 use fields qw(_login_token);

Bugzilla/Auth/Login/Env.pm

@@ -9,6 +9,7 @@ package Bugzilla::Auth::Login::Env;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Auth::Login);
 

Bugzilla/Auth/Login/Stack.pm

@@ -9,6 +9,7 @@ package Bugzilla::Auth::Login::Stack;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use base qw(Bugzilla::Auth::Login);
 use fields qw(

Bugzilla/Auth/Persist/Cookie.pm

@@ -9,6 +9,8 @@ package Bugzilla::Auth::Persist::Cookie;
 
 use 5.10.1;
 use strict;
+use warnings;
+
 use fields qw();
 
 use Bugzilla::Constants;

Bugzilla/Auth/Verify.pm

@@ -9,6 +9,8 @@ package Bugzilla::Auth::Verify;
 
 use 5.10.1;
 use strict;
+use warnings;
+
 use fields qw();
 
 use Bugzilla::Constants;

Bugzilla/Auth/Verify/DB.pm

@@ -9,6 +9,7 @@ package Bugzilla::Auth::Verify::DB;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Auth::Verify);
 

Bugzilla/Auth/Verify/LDAP.pm

@@ -9,6 +9,7 @@ package Bugzilla::Auth::Verify::LDAP;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use base qw(Bugzilla::Auth::Verify);
 use fields qw(

Bugzilla/Auth/Verify/RADIUS.pm

@@ -9,6 +9,7 @@ package Bugzilla::Auth::Verify::RADIUS;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Auth::Verify);
 

Bugzilla/Auth/Verify/Stack.pm

@@ -9,6 +9,7 @@ package Bugzilla::Auth::Verify::Stack;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use base qw(Bugzilla::Auth::Verify);
 use fields qw(

Bugzilla/Bug.pm

@@ -9,6 +9,7 @@ package Bugzilla::Bug;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Attachment;
 use Bugzilla::Constants;

Bugzilla/BugMail.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugMail;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Error;
 use Bugzilla::User;

Bugzilla/BugUrl.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUrl;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Object);
 

Bugzilla/BugUrl/Bugzilla.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUrl::Bugzilla;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::BugUrl);
 

Bugzilla/BugUrl/Bugzilla/Local.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUrl::Bugzilla::Local;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::BugUrl::Bugzilla);
 

Bugzilla/BugUrl/Debian.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUrl::Debian;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::BugUrl);
 

Bugzilla/BugUrl/GitHub.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUrl::GitHub;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::BugUrl);
 

Bugzilla/BugUrl/Google.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUrl::Google;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::BugUrl);
 

Bugzilla/BugUrl/JIRA.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUrl::JIRA;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::BugUrl);
 

Bugzilla/BugUrl/Launchpad.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUrl::Launchpad;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::BugUrl);
 

Bugzilla/BugUrl/MantisBT.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUrl::MantisBT;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::BugUrl);
 

Bugzilla/BugUrl/SourceForge.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUrl::SourceForge;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::BugUrl);
 

Bugzilla/BugUrl/Trac.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUrl::Trac;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::BugUrl);
 

Bugzilla/BugUserLastVisit.pm

@@ -9,6 +9,7 @@ package Bugzilla::BugUserLastVisit;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Object);
 

Bugzilla/CGI.pm

@@ -9,6 +9,7 @@ package Bugzilla::CGI;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(CGI);
 

Bugzilla/Chart.pm

@@ -15,6 +15,7 @@ package Bugzilla::Chart;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Error;
 use Bugzilla::Util;

Bugzilla/Classification.pm

@@ -9,6 +9,7 @@ package Bugzilla::Classification;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Constants;
 use Bugzilla::Field;

Bugzilla/Comment.pm

@@ -9,6 +9,7 @@ package Bugzilla::Comment;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Object);
 

Bugzilla/Comment/TagWeights.pm

@@ -9,6 +9,7 @@ package Bugzilla::Comment::TagWeights;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Object);
 

Bugzilla/Component.pm

@@ -9,6 +9,7 @@ package Bugzilla::Component;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Field::ChoiceInterface Bugzilla::Object);
 

Bugzilla/Config.pm

@@ -9,8 +9,10 @@ package Bugzilla::Config;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Exporter);
+
 use Bugzilla::Constants;
 use Bugzilla::Hook;
 use Data::Dumper;

Bugzilla/Config/Admin.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::Admin;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/Advanced.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::Advanced;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/Attachment.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::Attachment;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/Auth.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::Auth;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/BugChange.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::BugChange;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 use Bugzilla::Status;

Bugzilla/Config/BugFields.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::BugFields;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 use Bugzilla::Field;

Bugzilla/Config/Common.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::Common;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Email::Address;
 use Socket;

Bugzilla/Config/Core.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::Core;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/DependencyGraph.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::DependencyGraph;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/General.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::General;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/GroupSecurity.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::GroupSecurity;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 use Bugzilla::Group;

Bugzilla/Config/LDAP.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::LDAP;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/MTA.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::MTA;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 # Return::Value 1.666002 pollutes the error log with warnings about this

Bugzilla/Config/Memcached.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::Memcached;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/PatchViewer.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::PatchViewer;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/Query.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::Query;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/RADIUS.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::RADIUS;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/ShadowDB.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::ShadowDB;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Config/UserMatch.pm

@@ -9,6 +9,7 @@ package Bugzilla::Config::UserMatch;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Config::Common;
 

Bugzilla/Constants.pm

@@ -9,6 +9,7 @@ package Bugzilla::Constants;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Exporter);
 

Bugzilla/DB.pm

@@ -9,6 +9,7 @@ package Bugzilla::DB;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use DBI;
 

Bugzilla/DB/Mysql.pm

@@ -23,6 +23,7 @@ package Bugzilla::DB::Mysql;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::DB);
 

Bugzilla/DB/Oracle.pm

@@ -23,6 +23,7 @@ package Bugzilla::DB::Oracle;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::DB);
 
@@ -721,6 +722,7 @@ package Bugzilla::DB::Oracle::st;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent -norequire, qw(DBI::st);
  

Bugzilla/DB/Pg.pm

@@ -23,6 +23,7 @@ package Bugzilla::DB::Pg;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Error;
 use Bugzilla::Version;

Bugzilla/DB/Schema.pm

@@ -17,6 +17,7 @@ package Bugzilla::DB::Schema;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Error;
 use Bugzilla::Hook;

Bugzilla/DB/Schema/Mysql.pm

@@ -15,6 +15,7 @@ package Bugzilla::DB::Schema::Mysql;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Error;
 

Bugzilla/DB/Schema/Oracle.pm

@@ -15,6 +15,7 @@ package Bugzilla::DB::Schema::Oracle;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::DB::Schema);
 use Carp qw(confess);

Bugzilla/DB/Schema/Pg.pm

@@ -15,6 +15,7 @@ package Bugzilla::DB::Schema::Pg;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::DB::Schema);
 use Storable qw(dclone);

Bugzilla/DB/Schema/Sqlite.pm

@@ -9,6 +9,7 @@ package Bugzilla::DB::Schema::Sqlite;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::DB::Schema);
 

Bugzilla/DB/Sqlite.pm

@@ -9,6 +9,7 @@ package Bugzilla::DB::Sqlite;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::DB);
 

Bugzilla/Error.pm

@@ -9,6 +9,7 @@ package Bugzilla::Error;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Exporter);
 

Bugzilla/Extension.pm

@@ -9,6 +9,7 @@ package Bugzilla::Extension;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Constants;
 use Bugzilla::Error;

Bugzilla/Field.pm

@@ -59,6 +59,7 @@ package Bugzilla::Field;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Exporter Bugzilla::Object);
 @Bugzilla::Field::EXPORT = qw(check_field get_field_id get_legal_field_values);

Bugzilla/Field/Choice.pm

@@ -9,6 +9,7 @@ package Bugzilla::Field::Choice;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Field::ChoiceInterface Bugzilla::Object);
 

Bugzilla/Field/ChoiceInterface.pm

@@ -9,6 +9,7 @@ package Bugzilla::Field::ChoiceInterface;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Constants;
 use Bugzilla::Error;

Bugzilla/Flag.pm

@@ -9,6 +9,7 @@ package Bugzilla::Flag;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 =head1 NAME
 

Bugzilla/FlagType.pm

@@ -9,6 +9,7 @@ package Bugzilla::FlagType;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 =head1 NAME
 

Bugzilla/Group.pm

@@ -9,6 +9,7 @@ package Bugzilla::Group;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Object);
 

Bugzilla/Hook.pm

@@ -9,6 +9,7 @@ package Bugzilla::Hook;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 sub process {
     my ($name, $args) = @_;

Bugzilla/Install.pm

@@ -17,6 +17,7 @@ package Bugzilla::Install;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Component;
 use Bugzilla::Config qw(:admin);

Bugzilla/Install/CPAN.pm

@@ -9,6 +9,7 @@ package Bugzilla::Install::CPAN;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Exporter);
 our @EXPORT = qw(

Bugzilla/Install/DB.pm

@@ -12,6 +12,7 @@ package Bugzilla::Install::DB;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Constants;
 use Bugzilla::Hook;

Bugzilla/Install/Filesystem.pm

@@ -17,6 +17,7 @@ package Bugzilla::Install::Filesystem;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Constants;
 use Bugzilla::Error;

Bugzilla/Install/Localconfig.pm

@@ -17,6 +17,7 @@ package Bugzilla::Install::Localconfig;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Constants;
 use Bugzilla::Install::Util qw(bin_loc install_string);

Bugzilla/Install/Requirements.pm

@@ -15,6 +15,7 @@ package Bugzilla::Install::Requirements;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Constants;
 use Bugzilla::Install::Util qw(install_string bin_loc

Bugzilla/Install/Util.pm

@@ -13,6 +13,7 @@ package Bugzilla::Install::Util;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Constants;
 

Bugzilla/Job/BugMail.pm

@@ -9,6 +9,7 @@ package Bugzilla::Job::BugMail;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::BugMail;
 BEGIN { eval "use parent qw(Bugzilla::Job::Mailer)"; }

Bugzilla/Job/Mailer.pm

@@ -9,6 +9,7 @@ package Bugzilla::Job::Mailer;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Mailer;
 BEGIN { eval "use parent qw(TheSchwartz::Worker)"; }

Bugzilla/JobQueue.pm

@@ -9,6 +9,7 @@ package Bugzilla::JobQueue;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Constants;
 use Bugzilla::Error;

Bugzilla/JobQueue/Runner.pm

@@ -13,6 +13,7 @@ package Bugzilla::JobQueue::Runner;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Cwd qw(abs_path);
 use File::Basename;

Bugzilla/Keyword.pm

@@ -9,6 +9,7 @@ package Bugzilla::Keyword;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Object);
 

Bugzilla/Mailer.pm

@@ -9,6 +9,7 @@ package Bugzilla::Mailer;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Exporter);
 @Bugzilla::Mailer::EXPORT = qw(MessageToMTA build_thread_marker);

Bugzilla/Migrate.pm

@@ -9,6 +9,7 @@ package Bugzilla::Migrate;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Attachment;
 use Bugzilla::Bug qw(LogActivityEntry);

Bugzilla/Migrate/Gnats.pm

@@ -9,6 +9,7 @@ package Bugzilla::Migrate::Gnats;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Migrate);
 

Bugzilla/Milestone.pm

@@ -9,6 +9,7 @@ package Bugzilla::Milestone;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Object);
 

Bugzilla/Object.pm

@@ -9,6 +9,7 @@ package Bugzilla::Object;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Constants;
 use Bugzilla::Hook;

Bugzilla/Product.pm

@@ -9,6 +9,7 @@ package Bugzilla::Product;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Field::ChoiceInterface Bugzilla::Object);
 

Bugzilla/RNG.pm

@@ -9,6 +9,7 @@ package Bugzilla::RNG;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Exporter);
 use Bugzilla::Constants qw(ON_WINDOWS);

Bugzilla/Report.pm

@@ -9,6 +9,7 @@ package Bugzilla::Report;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Object);
 

Bugzilla/Search.pm

@@ -9,6 +9,7 @@ package Bugzilla::Search;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Exporter);
 @Bugzilla::Search::EXPORT = qw(

Bugzilla/Search/Clause.pm

@@ -9,6 +9,7 @@ package Bugzilla::Search::Clause;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use Bugzilla::Error;
 use Bugzilla::Search::Condition qw(condition);

Bugzilla/Search/ClauseGroup.pm

@@ -9,6 +9,7 @@ package Bugzilla::Search::ClauseGroup;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Bugzilla::Search::Clause);
 

Bugzilla/Search/Condition.pm

@@ -9,6 +9,7 @@ package Bugzilla::Search::Condition;
 
 use 5.10.1;
 use strict;
+use warnings;
 
 use parent qw(Exporter);
 our @EXPORT_OK = qw(condition);