Review Region: ~; my $selected; if($review_region eq 'North America') { $selected="selected"; }else{$selected=""; } print qq~ North America ~; if($review_region eq 'South America') { $selected="selected"; }else{$selected=""; } print qq ~ South America ~; if($review_region eq 'Asia Pacific/Africa') { $selected="selected"; }else{$selected=""; } print qq~ Asia Pacific/Africa ~; if($review_region eq 'Europe') { $selected="selected"; }else{$selected=""; } print qq ~ Europe Country: ~; my $i; my $country_code = Country($i) if($review_region eq 'North America'); print qq ~ United States ~;my $country_code = Country($i); print qq ~ Canada ~;my $country_code = Country($i); print qq ~ Mexico Facility: $fc_values