modern perl

MarkovBot/Commands.pm

@@ -1,5 +1,8 @@
 package MarkovBot::Commands;
 use base qw(Exporter);
+use 5.010;
+use strict;
+use warnings;
 
 our @EXPORT = qw(getCommandSubs);
 

MarkovBot/Config.pm

@@ -1,5 +1,8 @@
 package MarkovBot::Config;
 use base qw(Exporter);
+use 5.010;
+use strict;
+use warnings;
 
 our @EXPORT = qw(config);
 

MarkovBot/Ignore.pm

@@ -1,5 +1,8 @@
 package MarkovBot::Ignore;
 use base qw(Exporter);
+use 5.010;
+use strict;
+use warnings;
 
 our @EXPORT = qw(ignore unignore isIgnored);
 

MarkovBot/Learning.pm

@@ -1,5 +1,8 @@
 package MarkovBot::Learning;
 use base qw(Exporter);
+use 5.010;
+use strict;
+use warnings;
 
 our @EXPORT = qw(learn);
 

MarkovBot/Redis.pm

@@ -1,5 +1,8 @@
 package MarkovBot::Redis;
 use base qw(Exporter);
+use 5.010;
+use strict;
+use warnings;
 
 our @EXPORT = qw(redis);