<commit_before>#!/usr/bin/env perl

use v5.10;
use strict;
use warnings;

binmode STDOUT, ":utf8";

use Config::Tiny;
use Bot::Goose;
use Command::NowPlaying;
use Command::Comic;
use Command::Help;
use Command::Avatar;
use Command::Pick;
use Command::Weather;
use Command::Leave;
use Command::Play;
use Command::Info;
use Command::YouTube;
use Command::Say;
use Command::Hook;
use Command::PYX;
use Command::Define;
use Command::Twitch;
use Command::Roll;
use Data::Dumper;

# Fallback to "config.ini" if the user does not pass in a config file.
my $config_file = $ARGV[0] // 'config.ini';
my $config = Config::Tiny->read($config_file, 'utf8');
say localtime(time) . " Loaded Config: $config_file";

my $self = {};  # For miscellaneous information about this bot such as discord id

# Initialize the bot
my $bot = Bot::Goose->new('config' => $config);

# Register the commands
# The new() function in each command will register with the bot.
Command::Help->new          ('bot' => $bot);
Command::Say->new           ('bot' => $bot);
Command::Avatar->new        ('bot' => $bot);
Command::Pick->new          ('bot' => $bot);
Command::Leave->new         ('bot' => $bot);
Command::Play->new          ('bot' => $bot);
Command::Info->new          ('bot' => $bot);
Command::Hook->new          ('bot' => $bot);
Command::Define->new        ('bot' => $bot);
Command::Twitch->new        ('bot' => $bot);
Command::Roll->new          ('bot' => $bot);
Command::YouTube->new       ('bot' => $bot) if ( $config->{'youtube'}{'use_youtube'} );
Command::Comic->new         ('bot' => $bot) if ( $config->{'comic'}{'use_comic'} );
Command::Weather->new       ('bot' => $bot) if ( $config->{'weather'}{'use_weather'} );<commit_msg>Roll is now added as a moo command<commit_after>#!/usr/bin/env perl

use v5.10;
use strict;
use warnings;

binmode STDOUT, ":utf8";

use Config::Tiny;
use Bot::Goose;
use Command::NowPlaying;
use Command::Comic;
use Command::Help;
use Command::Avatar;
use Command::Pick;
use Command::Weather;
use Command::Leave;
use Command::Play;
use Command::Info;
use Command::YouTube;
use Command::Say;
use Command::Hook;
use Command::PYX;
use Command::Define;
use Command::Twitch;
use Command::Roll;
use Data::Dumper;

# Fallback to "config.ini" if the user does not pass in a config file.
my $config_file = $ARGV[0] // 'config.ini';
my $config = Config::Tiny->read($config_file, 'utf8');
say localtime(time) . " Loaded Config: $config_file";

my $self = {};  # For miscellaneous information about this bot such as discord id

# Initialize the bot
my $bot = Bot::Goose->new('config' => $config);

# Register the commands
# The new() function in each command will register with the bot.
Command::Help->new          ('bot' => $bot);
Command::Say->new           ('bot' => $bot);
Command::Avatar->new        ('bot' => $bot);
Command::Pick->new          ('bot' => $bot);
Command::Leave->new         ('bot' => $bot);
Command::Play->new          ('bot' => $bot);
Command::Info->new          ('bot' => $bot);
Command::Hook->new          ('bot' => $bot);
Command::Define->new        ('bot' => $bot);
Command::Twitch->new        ('bot' => $bot);
$bot->add_moo_command( Command::Roll->new('bot' => $bot) );
Command::YouTube->new       ('bot' => $bot) if ( $config->{'youtube'}{'use_youtube'} );
Command::Comic->new         ('bot' => $bot) if ( $config->{'comic'}{'use_comic'} );
Command::Weather->new       ('bot' => $bot) if ( $config->{'weather'}{'use_weather'} );
{'fraction_non_alphanumeric': 0.2007531865585168, 'fraction_numerical': 0.0034762456546929316, 'mean_word_length': 4.070484581497797, 'pattern_counts': {'":': 2, '<': 3, '<?xml version=': 0, '>': 72, 'https://': 0, 'lorem ipsum': 0, 'www.': 0, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '5635872', 'n_tokens_mistral': 1169, 'n_tokens_neox': 1142, 'n_words': 319}