[perl] %vars = ( address => errmsg("Some street"), adminuser => errmsg("admin"), adminpass => errmsg("pass"), city => errmsg("Some City"), code => errmsg("store"), company => errmsg("Some company"), country => errmsg("US"), domainname => errmsg("somecompany.com"), mailorderto => undef, emailservice => undef, emailinfo => undef, logo => undef, paycheck => undef, paycod => undef, paygate => undef, paymo => undef, paypo => undef, phone => undef, shipmethod => undef, shipzip => undef, shoppass => errmsg("pass"), shopuser => errmsg("shop"), smlogo => undef, state => "OH", tollfree => "(800) 555-1212", zip => "45056", ); for(keys %vars) { $Values->{$_} = $vars{$_}; $out .= "$_=$Values->{$_}
"; } return $out; [/perl] [bounce page=__UI_BASE__/wizard/step_company]