pbot/pbot

#!/usr/bin/env perl

# This Source Code Form is subject to the terms of the Mozilla Public
# License, v. 2.0. If a copy of the MPL was not distributed with this
# file, You can obtain one at http://mozilla.org/MPL/2.0/.

# PBot was started around 2001, 2002. It has been lovingly maintained;
# however, it does use the ancient Net::IRC package and some outdated
# Perl5 practices.
#
# It would be nice to use modern packages like Moo (or even Dios!)
# and Mojo::IRC, but PBot is a labor of 20+ years of love and contains
# many significant features that depend on how Net::IRC and Perl5 behaves.
#
# But don't fear. PBot's forked Net::IRC package has also been maintained
# and updated along with PBot. It contains numerous bugfixes and supports
# various new features such as IRCv3 client capability negotiation and SASL
# user authentication.

use FindBin qw($RealBin);
use lib "$RealBin/";

# configuration is overridden via command-line arguments, do not modify
# see doc/QuickStart.md
my %config = (
    data_dir   => "$RealBin/data",
    module_dir => "$RealBin/modules",
    plugin_dir => "$RealBin/Plugins",
    update_dir => "$RealBin/updates",
);

use PBot::PBot;
PBot::PBot->new(%config)->start();