sub EVENT_ZONE { my $GET_HP = $client->GetHP(); if ($GET_HP < 0) { quest::we(13, "$name has been killed in $zonesn!"); } }