modern perl
This commit is contained in:
parent
37c817f70e
commit
cf9ec8b9b4
|
@ -1,5 +1,8 @@
|
||||||
package MarkovBot::Commands;
|
package MarkovBot::Commands;
|
||||||
use base qw(Exporter);
|
use base qw(Exporter);
|
||||||
|
use 5.010;
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
our @EXPORT = qw(getCommandSubs);
|
our @EXPORT = qw(getCommandSubs);
|
||||||
|
|
||||||
|
|
|
@ -1,5 +1,8 @@
|
||||||
package MarkovBot::Config;
|
package MarkovBot::Config;
|
||||||
use base qw(Exporter);
|
use base qw(Exporter);
|
||||||
|
use 5.010;
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
our @EXPORT = qw(config);
|
our @EXPORT = qw(config);
|
||||||
|
|
||||||
|
|
|
@ -1,5 +1,8 @@
|
||||||
package MarkovBot::Ignore;
|
package MarkovBot::Ignore;
|
||||||
use base qw(Exporter);
|
use base qw(Exporter);
|
||||||
|
use 5.010;
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
our @EXPORT = qw(ignore unignore isIgnored);
|
our @EXPORT = qw(ignore unignore isIgnored);
|
||||||
|
|
||||||
|
|
|
@ -1,5 +1,8 @@
|
||||||
package MarkovBot::Learning;
|
package MarkovBot::Learning;
|
||||||
use base qw(Exporter);
|
use base qw(Exporter);
|
||||||
|
use 5.010;
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
our @EXPORT = qw(learn);
|
our @EXPORT = qw(learn);
|
||||||
|
|
||||||
|
|
|
@ -1,5 +1,8 @@
|
||||||
package MarkovBot::Redis;
|
package MarkovBot::Redis;
|
||||||
use base qw(Exporter);
|
use base qw(Exporter);
|
||||||
|
use 5.010;
|
||||||
|
use strict;
|
||||||
|
use warnings;
|
||||||
|
|
||||||
our @EXPORT = qw(redis);
|
our @EXPORT = qw(redis);
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue