22 lines
284 B
Perl
22 lines
284 B
Perl
|
#!/usr/bin/env perl
|
||
|
|
||
|
use v5.34.1;
|
||
|
|
||
|
use strict;
|
||
|
use warnings;
|
||
|
|
||
|
use L3TDE::Bot;
|
||
|
use Future::AsyncAwait;
|
||
|
|
||
|
L3TDE::Bot->create_bots;
|
||
|
|
||
|
for my $bot (@{L3TDE::Bot->find}) {
|
||
|
main($bot);
|
||
|
say 'AAAAAAAAAAAAAAAAAAAAAAAH';
|
||
|
}
|
||
|
|
||
|
async sub main {
|
||
|
my $bot = shift;
|
||
|
return $bot->start;
|
||
|
}
|