30 lines
631 B
Perl
Executable File
30 lines
631 B
Perl
Executable File
#!/usr/bin/env perl
|
|
|
|
# Auto IRC Bot. An advanced, lightweight anthd powerful IRC bot.
|
|
# Copyright (C) 2010-2011 Xelhua Development Team (doc/CREDITS)
|
|
# This program is free software; rights to this code are stated in doc/LICENSE.
|
|
package Auto;
|
|
use strict;
|
|
use warnings;
|
|
use POSIX;
|
|
use IO::Socket;
|
|
use FindBin qw($Bin);
|
|
our $Bin = $Bin;
|
|
unshift(@INC, "$Bin/../src");
|
|
#require Lang::Gettext;
|
|
#require API::Standard;
|
|
#require DB::Flatfile;
|
|
#require Parser::Config;
|
|
#require Parser::IRC;
|
|
#require IRC::Standard;
|
|
#require Sys::Full;
|
|
|
|
use constant {
|
|
NAME => 'Auto IRC Bot',
|
|
VER => 3,
|
|
SVER => 0,
|
|
REV => 0,
|
|
RSTAGE => 'd'
|
|
}
|
|
|