or download this
Use of each() on hash after insertion without resetting hash iterator
+results in undefined behavior, Perl interpreter: 0x677010 at /somepat
+h/cpan/5.18.4/1/somebuild/lib/perl5/Devel/Symdump.pm line 108.
at /somepath/cpan/5.18.4/1/somebuild/lib/perl5/Devel/Symdump.pm line
+108.
...
Devel::Symdump::_doit(Devel::Symdump=HASH(0x9d20270), "main") call
+ed at /somepath/cpan/5.18.4/1/somebuild/lib/perl5/Devel/Symdump.pm li
+ne 37
Devel::Symdump::new("Devel::Symdump", "main") called at [REDACTED]
+ line 361
[REDACTED]