#!/usr/bin/perl -w

$ENV{PATH} = "";

$cmd = "/bin/cp /etc/resolv.conf.tm /etc/resolv.conf";
print $cmd, "\n";
$code = system $cmd;

$cmd = "/bin/cp /etc/conf.d/net.work /etc/conf.d/net";
print $cmd, "\n";
$code = system $cmd;

$cmd = "/sbin/rc work";
print $cmd, "\n";
$code = system $cmd;