Not quite sure what you are wanting to achieve, but it sounds like you want to populate label and text widgets from %IdxToNickNameSel and possibly update those widgets as checkbutton values change. If that is the case then probably the easiest way to do that is write a sub that configures the contents of the labels and test widgets from the hash. You then call that sub to populate the widgets to start with, then again whenever contents change.

To get the update to happen on content change you need to add a -command handler to each checkbutton:

my $cb = $frame_pids->Checkbutton( -text => sprintf("%-15s",$pid_nickname), -variable => \$IdxToNickNameSel{$k}, -font => ['courier', 10, 'bold'], -command => sub {Refresh($k)} );

This is untested code! The idea is whenever the Checkbutton changes Refresh is called with the appropriate key as a parameter.

Optimising for fewest key strokes only makes sense transmitting to Pluto or beyond

In reply to Re: Perl Tk module; optional select to result presentation by GrandFather
in thread Perl Tk module; optional select to result presentation by jmClifford

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.