$ perl xmlt.pl xmldata2.xml 
para:This is a design XZY document for Project
	Parent : root

$ perl xmlt.pl xmldata.xml 
header:
                   This is a design XZY document for Project
                
	Parent : sect
	Parent : part
	Parent : root