PAL.C.T MINI SHELL
#!/usr/bin/perl
# setup.sh
# Copy the default config file into place
require './adsl-client-lib.pl';
&lock_file($config{'pppoe_conf'});
&system_logged("cp $module_root_directory/ifcfg-ppp $config{'pppoe_conf'}");
if ($config{'pppoe_conf'} =~ /ifcfg-(ppp\d+)$/) {
$conf = &get_config();
&save_directive($conf, "DEVICE", "$1");
&flush_file_lines();
}
&unlock_file($config{'pppoe_conf'});
&webmin_log("setup");
&redirect("");
y~or5J ={Eeu磝Qk ᯘG{?+]ן?wM3X^歌>{7پK>on\jy R g/=fOroNVv~Y+ NGuÝHWyw[eQʨSb> >}Gmx[o[<{Ϯ_qF vM IENDB`