Yes, this is a well known behavior/feature called autovivification. It basically means that Perl will create the variable on the fly. The use strict pragma will only stop autovivification of variables, but not hash elements. To test for the existance of a hash key with out creating it, you must use the exists function. Use along the lines of if exists $hash->{1} instead.

perldoc -f exists

exists EXPR
             Given an expression that specifies a hash element or
             array element, returns true if the specified element
             in the hash or array has ever been initialized, even
             if the corresponding value is undefined.  The
             element is not autovivified if it doesn't exist.

                 print "Exists\n"    if exists $hash{$key};
                 print "Defined\n"   if defined $hash{$key};
                 print "True\n"      if $hash{$key};

                 print "Exists\n"    if exists $array[$index];
                 print "Defined\n"   if defined $array[$index];
                 print "True\n"      if $array[$index];

             A hash or array element can be true only if it's
             defined, and defined if it exists, but the reverse
             doesn't necessarily hold true.

   ....

[download]

In reply to Re: Why does testing a key create a hash? by Roger
in thread Why does testing a key create a hash? by johnnywang

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.