load perlmods

mfd.pl

$modules_dir="$Bin/modules";
$modules_file="$modules_dir/module_order";

open(MOD_ORDER,$modules_file) or die "[-] Error: Could not open module order file, $!.\n";
my @MODULES=<MOD_ORDER>;
close($modules_file);
foreach my $module (@MODULES) {
        next if $module =~ /^#/;     # skip # 
        chomp($line);
        $module =~ s/\s+//;
        $module =~ s/\s+$//;
        next if $module eq "";
        require "$modules_dir/$module.hm";
        &$module;
}