#!/usr/bin/perl -w $ENV{PATH} = ""; $cmd = "/bin/cp /etc/resolv.conf.home /etc/resolv.conf"; print $cmd, "\n"; $code = system $cmd; $cmd = "/bin/cp /etc/conf.d/net.home /etc/conf.d/net"; print $cmd, "\n"; $code = system $cmd; $cmd = "/sbin/rc home"; print $cmd, "\n"; $code = system $cmd;