#untested, incomplete, adjust to your particular needs

sub install_module {
    my $updater = $top->repeat(500, \&update);
    do { install module };
    $updater->cancel;
}

sub update {
   my $output = get_output_from_wherever();
   $scrolled_text->insert('end', $output);
   $top->update;
}