if ($self->priv >= 5) {
foreach $ref (DXChannel::get_all()) {
$ref->send_now("D", DXProt::pc39($main::mycall, "Shutdown by $call"))
if ($self->priv >= 5) {
foreach $ref (DXChannel::get_all()) {
$ref->send_now("D", DXProt::pc39($main::mycall, "Shutdown by $call"))