G'day Ancient.Wizard,

Welcome to the Monastery.

The error is easy enough to generate using the each function, and a modificaton to the hash while iterating; doing so, without each(), is more difficult. I haven't encountered this issue previously; I don't know how to replicate it.

"I guess the real question is how to determine where this each() warning is coming from?"

You can turn that warning off, either in a lexically scoped block, or for a portion of sequential statements. perldiag shows that warning as "(S internal)". Keep in mind that turning off 'internal' warnings will get rid of not only your each() warnings but also all other 'internal' warnings. 

# each() (and other 'internal") warnings here

{
    no warnings 'internal';

    # No each() (or other 'internal") warnings here
}

# each() (and other 'internal") warnings here

no warnings 'internal';

# No each() (or other 'internal") warnings here

use warnings 'internal';

# each() (and other 'internal") warnings here

[download]

While I appreciate that your "application I'm coding at work" is likely to be confidential and not something you can post here; without seeing the code, and being able to replicate the issue, our responses will only be guesswork and conjecture. If you're able to reduce your problem to an SSCCE, the quality of answers may well improve.

See also: warnings.

— Ken

In reply to Re: To each() their own by kcott
in thread To each() their own by Ancient.Wizard

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.