perl script for processing some txt data

hello,
I've a txt file with some (1158 records) registry data on the form:

object(stdClass)#2 (1) { 
	["GetAnagraficheOrdineResult"]=> object(stdClass)#3 (1) { 
		["DtoAnagraficaDataWeb"]=> array(1159) { 
			[0]=> object(stdClass)#4 (81) { 
				ARRAY_MEMBERS
				}
			[1]=> object(stdClass)#5 (81) { 
				ARRAY_MEMBERS
				}
			......
			[1158]=> object(stdClass)#1162 (81) {
			ARRAY_MEMBERS
			}
		}
 
	}
}

Select allOpen in new window

Where ARRAY_MEMBERS has the structure:

["Field_description"]=> field_type "field_value"

Select allOpen in new window

i.e.

["ProfNome"]=> string(9) "John"
["ProfCognome"]=> string(5) "Doe"
["ProfLegalMail"]=> string(32) "john.doe@mail.com"

Select allOpen in new window

...etc...

I'd like to have a perl script that -once launched from the console- loops over all the 1158 records and construct 1158 lines contained ONLY the field_value of some selected field_descriptions "comma separated", i.e.

('Doe', 'John');

Select allOpen in new window

Thanks,
Fabiano