use Devel::Size; ... quick test program ...; print total_size(\%some_datastructure); # Error, Devel::Size has useless export functionality.