package Bot::BasicBot::Pluggable::Module::Spam; use strict; use warnings; use Data::Dumper; use base qw(Bot::BasicBot::Pluggable::Module); my $text = q{Enjoying Dirkocraft? Please consider a &9donation&4 to help out with hosting costs- &6It provides you with perks!&4 See the "Donation" link on &1dirkocraft.com&4 for details.}; sub help {return ""} our $counter = 0; sub tick { # called every 5 seconds unless ($counter++ % 240) {# every 20 minutes, 240 * 5 seconds, spam the users $self->say({body => , channel => "#dirkocraft-alert" }); }; } 1;