11 my $interfaces = read_file '/etc/network/interfaces';
13 if ( $interfaces !~ m{tap0.*$server::ip}s ) {
15 system "sudo apt-get install vde2";
19 iface tap0 inet static
21 netmask $server::netmask
26 write_file '/etc/network/interfaces', $interfaces;
30 if ( grep /tap0/, read_file '/proc/net/dev' ) {
33 system "sudo ifup tap0";
36 our $memory_size = 512;
37 our $mac = '52:54:00:00:00:01';
42 vdeq kvm -m $memory_size -net nic,vlan=1,macaddr=$mac
43 -net vde,vlan=1,sock=/var/run/vde2/tap0.ctl
49 $kvm = "xterm -e $kvm" if $ENV{DISPLAY};