Help for this page
my $FG_FrameInit = $PageFG -> LabFrame( -label=>"In +itialize Device", -labelside=>"acrosstop", ... my @a = $FG_FrameInit->children(); print "$_," for(@a);
Tk::Frame=HASH(0x2228e0c),Tk::Label=HASH(0x221f384),