in reply to Re: Re: Re: Tk question
in thread Tk question
Hi :)
It was $t which was causing the problem.I had declared it using
file.I did not notice this bit earlier.
Thanx :)
It was $t which was causing the problem.I had declared it using
i.e. global to the file so these statement latermy $t = $mw->Scrolled("Text",-font=>"{arial} 12 {bold}")->pack(-side = +> 'bottom', -fill => 'both', -expand => 1);
caused the problem.Here I had declared $t without "my".This portion of code was earlier in a separatefor($t=0;$t<$lthree;$t++) { if($mpart=~/$three[$t]/)
file.I did not notice this bit earlier.
Thanx :)
|
---|
In Section
Seekers of Perl Wisdom