#!/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");