Re^2: Two simple code style advice questions

[choroba]

in reply to Re: Two simple code style advice questions
in thread Two simple code style advice questions

Probably not true anymore (v5.10.1):

$ perl -E 'use Devel::Size qw(total_size);
           my (%h1, %h2);
           my @ar = 0 .. 1e6;
           undef @h1{@ar};
           %h2 = map { $_ => undef } @ar;
           say for map total_size($_), \%h1, \%h2;
          '
60083287
60083287