|
@@ -423,6 +423,10 @@ sub said {
|
|
|
elsif ($message->{body} =~ /^\Q$symbol\Evote/) {
|
|
elsif ($message->{body} =~ /^\Q$symbol\Evote/) {
|
|
|
lecture_fichier("vote");
|
|
lecture_fichier("vote");
|
|
|
}
|
|
}
|
|
|
|
|
+ # les infos par rapport à l'ag de la fédé
|
|
|
|
|
+ elsif ($message->{body} =~ /^\Q$symbol\Eag/) {
|
|
|
|
|
+ lecture_fichier("ag");
|
|
|
|
|
+ }
|
|
|
elsif ($message->{body} =~ /datafoin/) {
|
|
elsif ($message->{body} =~ /datafoin/) {
|
|
|
my $de = int rand(5);
|
|
my $de = int rand(5);
|
|
|
if ($de==1) {
|
|
if ($de==1) {
|
