rendered paste body#!/usr/bin/perl
IRC::command ("/echo Alload is Loaded");
sub alload
{
IRC::command ("/load ~/anime.pl");
IRC::command ("/echo loaded anime.pl");
IRC::command ("/load ~/google.pl");
IRC::command ("/echo loaded anime.pl");
IRC::command ("/load ~/wiki.pl");
IRC::command ("/echo loaded wiki.pl");
IRC::command ("/load ~/imdb.pl");
IRC::command ("/echo loaded imdb.pl");
IRC::command ("/load ~/youtube.pl");
IRC::command ("/echo loaded youtube.pl");
IRC::command ("/load ~/autorejoinonpart.py");
return 1;
}
IRC::register ("alload", "59.0", "", "");
IRC::add_command_handler ("alload", "alload");