Net-ISP-Balance

 view release on metacpan or  search on metacpan

t/01.config.t  view on Meta::CPAN

use FindBin '$Bin';
use lib $Bin,"$Bin/../lib";

use Test::More tests=>45;

my $dummy_data = {
    ip_addr_show =><<'EOF',
1: lo: <LOOPBACK,UP,LOWER_UP> mtu 65536 qdisc noqueue state UNKNOWN 
    link/loopback 00:00:00:00:00:00 brd 00:00:00:00:00:00
    inet 127.0.0.1/8 scope host lo
    inet6 ::1/128 scope host 
       valid_lft forever preferred_lft forever
2: eth0: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc pfifo_fast state UP qlen 1000
    link/ether 00:01:c0:08:3e:38 brd ff:ff:ff:ff:ff:ff
    inet 191.3.88.152/27 brd 255.255.255.255 scope global eth0
    inet6 fe80::201:c0ff:fe08:3e38/64 scope link 
       valid_lft forever preferred_lft forever
3: eth1: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc pfifo_fast state UP qlen 1000
    link/ether 00:01:c0:08:3e:39 brd ff:ff:ff:ff:ff:ff
    inet 192.168.10.1/24 brd 192.168.10.255 scope global eth1
    inet6 fe80::201:c0ff:fe08:3e39/64 scope link 
       valid_lft forever preferred_lft forever
4: eth2: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc pfifo_fast state UP qlen 1000
    link/ether 48:f8:b3:2e:f6:b2 brd ff:ff:ff:ff:ff:ff
    inet 192.168.11.11/24 brd 192.168.11.255 scope global eth2
    inet6 fe80::4af8:b3ff:fe2e:f6b2/64 scope link 
       valid_lft forever preferred_lft forever
5: wlan0: <BROADCAST,MULTICAST> mtu 1500 qdisc noop state DOWN qlen 1000
    link/ether 00:0d:f0:63:95:61 brd ff:ff:ff:ff:ff:ff
6: eth3: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc pfifo_fast state UP qlen 1000
    link/ether 48:f8:b3:2e:f6:b2 brd ff:ff:ff:ff:ff:ff
    inet 192.168.12.1/24 brd 192.168.12.255 scope global eth3
    inet 192.168.13.1/24 brd 192.168.13.255 scope global eth3:0
    inet6 fe80::4af8:b3ff:fe2e:f6b2/64 scope link 
       valid_lft forever preferred_lft forever
7: eth4: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc pfifo_fast state UP qlen 1000
    link/ether 48:f8:b3:2e:f6:b2 brd ff:ff:ff:ff:ff:ff
    inet6 fe80::4af8:b3ff:fe2e:f6b2/64 scope link 
       valid_lft forever preferred_lft forever
8: ppp0: <POINTOPOINT,MULTICAST,NOARP,UP,LOWER_UP> mtu 1492 qdisc pfifo_fast state UNKNOWN qlen 3
    link/ppp 
    inet 11.120.199.108 peer 112.211.154.198/32 scope global ppp0
9: eth5: <BROADCAST,MULTICAST,UP,LOWER_UP> mtu 1500 qdisc pfifo_fast state UP qlen 1000
    link/ether 48:f8:b3:2e:f6:b4 brd ff:ff:ff:ff:ff:ff
    inet 192.168.20.1/24 brd 192.168.20.255 scope global eth5
    inet6 fe80::4af8:b3ff:fe2e:f6b2/64 scope link 
       valid_lft forever preferred_lft forever
31: tun0: <POINTOPOINT,MULTICAST,NOARP,UP,LOWER_UP> mtu 1500 qdisc pfifo_fast state UNKNOWN qlen 100
    link/none 
    inet 10.8.0.1 peer 10.8.0.2/32 scope global tun0
EOF

    ip_route_show =><<'EOF',
default
	nexthop via 112.211.154.198  dev ppp0 weight 1
	nexthop via 191.3.88.1 dev eth0 weight 1



( run in 0.253 second using v1.01-cache-2.11-cpan-87723dcf8b7 )