Dialog Prozor

Poštovanje,

ovako,
radim neki simple perl/tk jabber client koristeci net::jabber modul.
Konekcija i parsovanje XML-a su urađeni kako treba nego postoji tu jedan problem kod primanja poruka,
kada user otvori dialog window da bi otpočeo konverzaciju sa npr. žojom, slanje poruka je ok, to je završeno, e sada kod primanja poruka
imam problem, kako, ako je aktivan dialog window npr. sa tim istim žojom da se njegova poruka ispiše u taj dialog window?
Nadam se da ste me shvatili.

Ja sam rešio da se sve pristigle poruke ispišu u neki prozor koji sadrži text polje, i output izgleda ovako:

Primljena poruka od Žoja:
BlaBlaBlaBlaBla
-KRAJ PORUKE-

Primljena poruka od Sima:
BrmBrmBrmBrmBrm
- KRAJ PORUKE -

itd...

Svaka ideja ja dobro došla.
Hvala u napred!

Potpis

When you say "I wrote a program
that crashed Windows", people
just stare at
you blankly and say "Hey, I got
those with the system, *for
free*".
-- Linus Torvalds

A da koristis neku promenljivu kao Fleg ?
Pa kad otvoris prozor stavis recimo u asocijativni niz
na ime tog sa kim je otvoren prozor (kao u icq-u) stavis
vrednost 1.

Posto ja bas i nisam radio sa asocijativnim nizovima ali nesto ovako valjda ide.

$Fleg{"$Name"}=1;

A kada ga zatvoris samo stavis 0.

I svaki put kad ti pristigne poruka ti proveris dali je

$Fleg{"$Name"} jednako 0 ili 1 .... podrazumeva se da je $Name = ime ko ti je poslao poruku tj. sa kim ti je otvoren prozor ?