Кто-нибудь знает модуль, который имеет функцию, которая возвращает скорость загрузки в Кб / с?

Question

Кто-нибудь знает модуль, который имеет функцию, которая возвращает (например, для eth0) скорость загрузки?

Answer 1

Используйте программу мониторинга: поверх, iftop, ntop, dstat, icinga, munin, knemo, ksysguardd

Answer 2

#!/usr/bin/perl

use strict;
use warnings;
use Time::HiRes;
use LWP::Simple;

my $url = 'http://www.cnn.com/';
my $file = 'cnn.html';
my $start = [Time::HiRes::gettimeofday()];
getstore($url, $file);
my $time = Time::HiRes::tv_interval($start);
my $size = -s $file;

printf "Speed: %d kbps\n", $size/$time/1000;