push(@colour, ${Header::colourfw} );
}
-my @vpn = ` route -n | grep ipsec | awk '{ print \$1" "\$3}'`;
+my @vpn = `/usr/local/bin/ipsecctrl I|grep erouted|cut -d"]" -f3|cut -d"=" -f4|cut -d";" -f1| sed "s|/| |g"`;
foreach my $route (@vpn) {
chomp($route);
my @temp = split(/[\t ]+/, $route);