perl script to parse acme packet cdr files and add in the avp name to the field