librenms/mibs/process.pl
Richard Hartmann 5c0921da19 mibs/: Fix permissions
MIBs don't need to be executable.
2015-11-03 16:41:25 +01:00

22 lines
249 B
Perl

#!/usr/bin/perl
sub getfiles {
opendir(DIR,".");
while($file = readdir(DIR)) {
if($file !~ /^\./) {
foreach $all ($file) {
system("snmpttconvertmib --in=$all --out=/etc/snmp/snmptt-d.conf");
print "$all\n";
}
}
}
closedir(DIR);
}
&getfiles;