My perl Tk application uses a couple of tearoff menus. When
the menu has been torn off, it becomes a new Toplevel widget.
I haven't been able to determine how one can get a handle,
or reference to that Toplevel (tornoff) widget, in order to
destroy it. Is it a child of the mainwindow?