for my $dir (glob '*/') {

##</code><code>##

for my $dir (grep -d, glob '*') {

##</code><code>##

sub load_from_path {
    my ($module_path) = @_;
    # etc.
}

sub load_from_name {
    my ($module_name) = @_;
    my $module_path = ...;
    load_from_path($module_path);
}