Select Code to Download

sub DESTROY {
    my $self = shift;
    &stop;
}

sub DESTROY {
    my $self = shift;
    $self->stop();
}

local $SIG{INT} = 'IGNORE';
kill INT => -$$;

kill INT => $self->{pid};