Help for this page

Select Code to Download

Select or download this

c:\test>perl -MDevel::Size=total_size -lwe
"$h{ $_ } = [1 .. $_] for 1 .. 1e3;scalar<>;print total_size( \%h ); s
+calar <>;"
...
253,644k
250591721
253,776k