net/apply.cgi

   1 #!/usr/local/bin/perl
   2 # apply.cgi
   3 # Apply the current network config
   4
   5 require './net-lib.pl';
   6 $access{'apply'} || &error($text{'apply_ecannot'});
   7 &apply_network();
   8 sleep(1);
   9 &redirect("");
  10