- foreach (
- ("db", "path", "login", "password",
- "partnumber", "description", "customer_name", "all",
- "expiring_in", "show_expired")
- ) {
- $callback .= "\&${_}=" . $form->escape($form->{$_}, 1);
- }
+ map { $callback .= "\&${_}=" . $form->escape($form->{$_}, 1) }
+ qw(db partnumber description customer_name all expiring_in show_expired);