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

print $new_hash{'no doughnut'};