package Proj::Analizer; use GTop; use Template::Plugin::Comma; require Module::Pluggable::Fast; &main; sub proj_size { my $self = shift; my $proj_name = shift; my $before = GTop->new->proc_mem($$)->size; my $meth = "_${proj_name}_components"; Module::Pluggable::Fast->import( name => $meth, search => [ "${proj_name}::Data", "${proj_name}::Pages" ], require => 1, ); $self->$meth; my $after = GTop->n