mirror of https://github.com/pragma-/pbot.git
34 lines
1.2 KiB
Perl
Executable File
34 lines
1.2 KiB
Perl
Executable File
#!/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();
|