The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Memchmark - Check memory consumption

SYNOPSIS

  use Memchmark qw(cmpthese);
  my @data = map { rand($_) } 0..10000;
  cmpthese( -init => sub { my @s =  @data },
            nsort => sub { my @s = sort { $a <=> $b } @data },
            rnsort => sub { my @s = sort { -($a <=> $b) } @data } );

DESCRIPTION

Memchmark is similar to Benchmark but compares memory comsumptions instead of times.

To measure memory comsumption for some subroutine, Memchmark forks a new process to run the sub and then monitors its memory usage every 100ms (aprox.) recording the maximum amount used.

The obtained quantities are only approximate, you can expect errors around 30%.

It is not reliable for small quantities (useles for anything below 1MB).

EXPORT_OK

These are the subroutines available from Memchmark:

cmpthese(foo => sub { ... }, bar => sub { ... }, ...)

prints statistics about the memory comsumption for the different subs.

An entry with the name -init can be used for a do nothing entry which memory comsumption will be substracted to the results from the rest of the tests.

memchmark { &code() };

returns the memory used by &code().

BUGS

This is a very early release, alpha software, expect bugs on it.

The API is not stable. I will change it when required for improvement.

It will not work under Windows (ever).

SEE ALSO

Benchmark, Proc::ProcessTable, Proc::ProcessTable::Process, fork.

AUTHOR

Salvador Fandiño, <sfandino@yahoo.com>

COPYRIGHT AND LICENSE

Copyright (C) 2005 by Salvador Fandiño

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.6 or, at your option, any later version of Perl 5 you may have available.