Miscellany

#Dynamic module loader for listeners
sub load_listeners {

    my @modules;

    foreach $dir (@INC) {
        if (-e "$dir" . "//PMBot") {
            opendir($pmbot_dir, "$dir" . "//PMBot//Listeners//") or die "cant opendir $some_dir: $!";
            @modules = grep {/*.pm/} readdir($pmbot_dir);
            closedir $pmbot_dir;
        }
    }
    
    foreach $filename (@modules) {
       
        my $module_name = "PMBot::Listeners::" . "
        require $module;
    }

}