foreach my $option (split(',', $cgi->param('multi_options'))) {
my $value = '';
foreach my $row (sort keys %{$optionrows{_ALL_}}) {
- $value .= ($optionrows{$option}{$row} || '') . "\n";
+ $value .= ($optionrows{$option}{$row} // '') . "\n";
}
chomp($value);
$options{$option} = $value;
if ( $cgi->param('svc_machine') eq 'Y' ) {
$new->machine('_SVC_MACHINE');
$new->part_export_machine_textarea( $cgi->param('part_export_machine') );
+ $new->default_machine_name( $cgi->param('default_machine_name') );
}
my $error;