use Devel::Size qw(total_size); print total_size(*::), "\n";