What do $state->{pullType} and $state->{pullDs} contain? Are you using strict?

Most likely, the two hash entries contain the same thing (probably an inital desired state string), and you're not using strict. The -variable option expects a reference, and you're passing it (presumably) a simple scalar. If you're not using strict, this will get treated as a symbolic reference. If it's a valid symbolic reference (and an empty string is a valid reference), you're basically giving the two BrowseEntry's the same state variable, so changes in one are going to be reflected in the other automatically.

To illustrate, try this example code:

#!/usr/bin/winperl use Tk; use Tk::BrowseEntry; $state = { one => '', two => '', three => '', four => '', }; $mw = MainWindow->new(); $mw->BrowseEntry( -label => 'List One', -choices => [qw(foo bar)], -variable => $state->{one}, )->grid(-padx => 5, -pady => 5); $mw->BrowseEntry( -label => 'List Two', -choices => [qw(baz quux)], -variable => $state->{two}, )->grid(-padx => 5, -pady => 5); # versus $mw->BrowseEntry( -label => 'List Three', -choices => [qw(foo bar)], -variable => \$state->{three}, )->grid(-padx => 5, -pady => 5, -column => 2, -row => 0); $mw->BrowseEntry( -label => 'List Four', -choices => [qw(baz quux)], -variable => \$state->{four}, )->grid(-padx => 5, -pady => 5, -column => 2, -row => 1); MainLoop;

bbfu
Black flowers blossom
Fearless on my breath


In reply to Re: Perl/Tk - values appearing in the wrong place! by bbfu
in thread Perl/Tk - values appearing in the wrong place! by jdtoronto

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.