I think you probably want

foreach $value2 ("ship","weight","dwg","rev") {
  print TEMP ("\"$import_values{$value2}\",");
}
print TEMP ("\n");
[download]

or something approximating that.

Nuance

Baldrick, you wouldn't see a subtle plan if it painted itself purple and danced naked on top of a harpsichord, singing "Subtle plans are here again!"