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

foreach my $variable (@array) {
   print "$variable\n";
  # do something to set the variable
  ($var, $value) = split/=/,$variable;
  now what?
}