sub loadoids_file{
    my($dir, @mibs) = @_;
    my($mib);
    return error_return("Directory $dir does not exist\n") unless (-d $dir);
    foreach $mib (@mibs) {
        my($mibfile) = "$dir/$mib";
        if ( -f $mibfile) {
            open(MIBFILE, "<$mibfile");
            my($line);
            while(defined($line = <MIBFILE>)) {
                if (!($line =~ /^\#/)) {
                    my ($name, $oid) = ($line =~ /\"(.*)\".*\"(.*)\"/);
                    add_mapping($oid, $name, undef);
                }
            }
            close(MIBFILE);
        } else {
            error("Mibfile $mibfile does not exist\n");
        }
    }
}