33 |
|
|
34 |
} |
} |
35 |
|
|
36 |
ifconfig('tap0') =~ m{UP} && return 'up'; |
my $ifconfig = ifconfig('tap0'); |
37 |
system("sudo ifup tap0") == 0 && return 'started'; |
if ( $ifconfig =~ m{UP} ) { |
38 |
|
$ifconfig =~ m{$server::ip}s && return 'up'; |
39 |
|
system("sudo /sbin/ifconfig tap0 $server::ip netmask $server::netmask") == 0 && return "ip changed $server::ip"; |
40 |
|
die "can't change IP address of tap0 to $server::ip"; |
41 |
|
} |
42 |
|
system("sudo ifup tap0") == 0 && return 'started'; |
43 |
|
die "can't start tap0: $!"; |
44 |
} |
} |
45 |
|
|
46 |
1; |
1; |