foreach $value3 (keys @import_values{"ship","weight","dwg","rev"}) { print TEMP ("\"$value3\","); }