++chromatic , ++robartes
Aha - I think I get it. Having not used inheritance yet I failed to recognise the case for using it. So if I have this right.....

package oo::job;
@ISA = qw/ oo::gui::defaultjob/;
use strict;

sub new { }; # Make my hash and bless into oo::job
1;

package oo::gui::defaultjob;
@ISA= qr/ Tk /;

sub build_gui { }; #packing widgets into a toplevel object
sub display{} ; #invoke MainLoop on toplevel 
1;
package main;
use oo::job;
my $job = oo::job->new( %options );
 $job->build_gui();
 $job->display;
[download]

Now if that is even close , then my program just got about 1000 times easier to build.

submersible_toaster shuffles off to the library for further wisdom

Comment on Re: Revolving door blessing. Download Code