Select Code to Download

sub _wait_while_busy {
    my $self = shift;
...
    $self->{ $_ } = undef for qw( forms cur_form links images );
    return $self->success;
}