Select Code to Download

%new_hash = (split(/;/,$variable_with_keys_and_values));

%new_hash = (split(/;/,'apple;good;banana;good;citrus;good;no doughnut
+;bad cop'));

print $new_hash{'no doughnut'};