Net::Shaper - Simple TCP Traffic Shaper
use Net::Shaper; my $shaper = Net::Shaper->new( LocalPort => 8000, PeerAddr => "my.site.com:80", Bps => 6000 ); # 6000 Bytes/sec. =~ 48,000 bits/sec. $shaper->run(); # does not return
Net::Shaper can be used to implement a point-to-point TCP tunnel that limits bandwidth.
This module only works for TCP connections. It has only been tested on Linux.
Benjamin Holzman, <bholzman@earthlink.net>
To install Net::Shaper, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Net::Shaper
CPAN shell
perl -MCPAN -e shell install Net::Shaper
For more information on module installation, please visit the detailed CPAN module installation guide.