perl -00 -wnl -e '/OIDNAME OBJECT-TYPE/ and print;' mibfile.txt | perl -wnl -e '/".*"/s and print;'