do { turn_green(); throw_up(); die "Ach, food poisoning"; ) if $ptomaine;