Select Code to Download

## This would be my main script, and I'll keep it 
## fairly simple. Notice that I'm using a module 
...
})->pack;

MainLoop;

package ContinueBox;
use Tk;
...
   return $cw->{Result};
}
1;

package ContinueBox;
use Tk;
...
   }); 
}
1;