perl parser generate name and oid line