use Devel::Size qw(size);
say size( 123456789 );