for my $ImgNo (1..12) {
  # Storing them into an array is easy:
  $image[$_] = $vehicle->{Images}->{'Image_'.$ImgNo};
  # or you could also skip empty values:
  push @image,$vehicle->{Images}->{'Image_'.$ImgNo} if $vehicle->{Images}->{'Image_'.$ImgNo} ne '';
  # or you may want to keep the variable names:
  eval('$image'.$ImgNo.'=$vehicle->{Images}->{"Image_".$ImgNo};');
 }