Select Code to Download

my @vehicle_list = @{ $config->{Vehicle} };

foreach my $vehicle ( @vehicle_list ) {
    print $vehicle->{AuctionID} . "\n";
}