perl -p0e "s/<managedObject.*?>.*<\/managedObject>/$& x 100/se" testinsmall.xml > testin.xml