change from egrep to grep -E (#262)

was deprecated by GNU

Author: inphobia

EXTRAS/scripts/oldstyle/mkindex2

@@ -29,7 +29,7 @@ find(sub{ -d or unlink or die $! },
 
 # bootstrap initial three indexes
 status('net-snmp:rfc');
-system(q(snmptranslate -IR sysName | egrep -v '^SNMPv2-MIB::sysName$'));
+system(q(snmptranslate -IR sysName | grep -E -v '^SNMPv2-MIB::sysName$'));
 
 # now for all the other dirs
 my $next = 2;
@@ -42,7 +42,7 @@ foreach (sort map {(splitdir($_))[-1]} grep {-d} glob("$ENV{MIBHOME}/*")) {
 
   $ENV{SNMP_PERSISTENT_DIR} = $tmpdir->dirname;
   qx(snmptranslate -IR sysName 2>&1 >/dev/null);
-  system(qq(snmptranslate -M'$newmibdirs' -IR sysName | egrep -v '^SNMPv2-MIB::sysName\$'));
+  system(qq(snmptranslate -M'$newmibdirs' -IR sysName | grep -E -v '^SNMPv2-MIB::sysName\$'));
   $ENV{SNMP_PERSISTENT_DIR} = "$ENV{MIBHOME}/EXTRAS/indexes";
 
   copy("$tmpdir/mib_indexes/2", "$ENV{SNMP_PERSISTENT_DIR}/mib_indexes/$next");
@@ -66,7 +66,7 @@ find(sub{
 
   # copy over sorted content of the index
   my $dest = "$ENV{SNMP_PERSISTENT_DIR}/cache/$vendor";
-  system(qq(egrep -v '^DIR ' '$_' | sort -dfs > '$dest')) and die ($? >> 8);
+  system(qq(grep -E -v '^DIR ' '$_' | sort -dfs > '$dest')) and die ($? >> 8);
 
   # copy the cache *back* to the index so the index is properly sorted
   system(qq(echo 'DIR $ENV{MIBHOME}/$vendor' > '$_')) and die ($? >> 8);

EXTRAS/scripts/prepmibs

@@ -93,9 +93,9 @@ foreach my $mib (sort keys %{$file_for}) {
   my $shortoldfile = catfile((splitdir($oldfile))[-2,-1]);
 
   # Look for version numbers - https://tools.ietf.org/html/rfc2578
-  my $oldv = max(qx(egrep -A1 '(REVISION|LAST-UPDATED)' '$oldfile')
+  my $oldv = max(qx(grep -E -A1 '(REVISION|LAST-UPDATED)' '$oldfile')
     =~ m/"(\d{10}|\d{12})Z?"/g);
-  my $newv = max(qx(egrep -A1 '(REVISION|LAST-UPDATED)' '$newmibfile')
+  my $newv = max(qx(grep -E -A1 '(REVISION|LAST-UPDATED)' '$newmibfile')
     =~ m/"(\d{10}|\d{12})Z?"/g);
 
   if ($oldv and $newv) {

EXTRAS/scripts/util/diff_dir

@@ -27,8 +27,8 @@ foreach my $f (@new_files) {
         if ($d !~ /^\s*$/) {
             print "$f diffs. \n" unless $d eq '1';
             # Look for version numbers
-            print "  OLD: ",`egrep -A 1 '(REVISION|LAST-UPDATED)' $dir_old/$file`;
-            print "  NEW: ",`egrep -A 1 '(REVISION|LAST-UPDATED)' $dir_new/$file`;
+            print "  OLD: ",`grep -E -A 1 '(REVISION|LAST-UPDATED)' $dir_old/$file`;
+            print "  NEW: ",`grep -E -A 1 '(REVISION|LAST-UPDATED)' $dir_new/$file`;
             print `cp -f $f $dir_old` if $copy;
             print "\n";
         }