Re^4: convert a single thread application to multithread with GUI

[ultibuzz]

thats an awsome exaple, now i know how to make a cmd like text scrollbox ;)
also the thread reuse thing is now a bit clearer
thx for the nice example and i hope it will push me in the right direction

kd ultibuzz

[zentara]

One thing I forgot to mention is that threads can share a filehandle thru the fileno, so that can help in logging. Your main thread can open the FH to the log, then you send the fileno of the FH to the threads, and they can print to it. See FileHandles and threads

[ultibuzz]

cheers,
yeah shared FH i know.
but i encounter another problem, the TK- Scrolled object wich is used to display eat up all memory ;).
is there a way to limit the box to 1000 lines and then it shoud overwrite ?, so it will not write the memory full :D.

kd ultibuzz

[zentara]

Here is the basic idea, for a sliding buffer of 'x' lines:

#!/usr/bin/perl
use Tk;
use Tk::Text;

my $mw=tkinit;

my $text = $mw->Scrolled('Text')->pack;

$text->bind('<Return>',[sub { &check_limit   }]);

$mw->Button(-text=>'Press Me', -command=>sub {
     $text->insert('end',$i++."\n");
     $text->see('end');
     &check_limit;
  })->pack;

$mw->Button(-text=>'Exit', 
     -command=>sub {exit})->pack;

for (1..198){
$text->insert('end',$_."\n");
     $text->see('end');
}

MainLoop;

sub check_limit{
  $text->delete('1.0', "end -200 lines");
}