#!/usr/bin/perl

require '/var/smoothwall/header.pl';

umask 022;

my %pppsettings;

# read vars back from file.
%pppsettings = &readhash("${swroot}/ppp/settings");

unlink "${swroot}/ppp/active";

system '/usr/local/bin/dnrd';

system "/bin/echo -en \a >/dev/console";
sleep 1;
system "/bin/echo -en \a >/dev/console"; 