Help for this page

Select Code to Download


  1. or download this
    perl -MDevel::Size=total_size
-wle"$h{ $_ } = [ \( 1 .. $_) ] for 1 .. 3e3;
      scalar<>; print total_size( \%h ); scalar <>"
  2. or download this
    c:\test>perl 
-MHTML::Parser 
...
# Devel::Size: baseop: 1f24a44 baseop->op_next: d1 ignored!
# Devel::Size: baseop: 2448324 baseop->op_next: cc ignored!
7832419