use HTTP::Size;
my $total = 
    HTTP::Size::get_sizes( 'http://www.perlmonks.org' );
print "$total\n";