I am working with Tk canvas & need to print all canvas objects in txt file . I have seen canvas postscript but it it doesn't print the data i need.......

for example : i have a canvas .. In this i have 2 rectangles name A & B.
within A -> i have A1 & A2 rectangles....
withing B -> i have B1 & B2 rectangles...

I need to print like ..

A: parent canvas : child A1 A2 ......
B: Parent Canvas : child B1 B2 .......
A1: parent A : child none ......
A2: parent A : child none .....
B1: parent B : child none .....
B2: parent B : child none
[download]