Just to clarify, "Use of uninitialized value in string eq" is a warning (because you have wisely put "-w" on the first line of the script). It is not an error. It is simply telling you that at line 200 in file.pl, you are comparing two values with the "eq" operator, and one of them has not been initialized yet (it is "undef" at the point where that line of code is executed).

So is that really a problem? You don't actually say... is there something that the script is supposed to be doing that it does not do? Is it doing something (besides printing the warning) that it should not do?

You don't seem to be showing us line 200 of file.pl, so we don't know what's actually going on. It's not even clear whether it has anything at all to do with your DEFAULTIN file handle. (Maybe it isn't related, but if it is, maybe knowing what is at line 21 of "default.txt" would be relevant.)

In reply to Re: Changing the Textvariable of a restricted entry widget (TK) by graff
in thread Changing the Textvariable of a restricted entry widget (TK) by Real Perl

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.