Select Code to Download

print Dumper(\%shipto);

$VAR1 = { 'country' => { 'label' => 'Namn', 'i' => 3 }, 
'name' => { 'label' => 'Klinik', 'i' => 11 }, 
...
'city' => { 'label' => 'Stad', 'i' => 7 }, 
'fax' => { 'label' => 'Personnr', 'i' => 2 }, 
'address1' => { 'label' => 'Adress', 'i' => 4 } };

$VAR1 = undef;