I learned the hard way too( which is why I havn't forgot :-) ). But the rewrite went pretty easy, since most of the logic was already thought out, and it was just changing the way things get displayed. Also, your next project will be alot easier, since you will know this from the beginning, and design accordingly.

You think "what boxes" am I going to be displaying to the screen"? Then put them into hashes to make them easy to loop thru, like:

my %toplevel_1;
my %toplevel_2;

....
...
$toplevel_1{'label'} = $tl_1->Label(..etc);
$toplevel_1{'text'} = $tl_1->Text(..etc);


$toplevel_1{'label'}->configure(-text => $new_text);
$toplevel_1{'text'}->delete('1.0','end');
[download]