Help for this page

Select Code to Download

Select or download this

my @array = qw(daemon=7500 port=tcp resil=60);

...
  ($var, $value) = split/=/,$variable;
  now what?
}

Select or download this

 for $var (keys %$VARS) {
        $ENV{$var} = $$VARS{$var};
 }