Re^3: Perl TK threads using while

Hi zentara

Thanks for your response. The examples which you have mentioned starts automatically, but i want to start the event after pressing the button same for stop.

If i assigned to the button it gets hangged.

And every 3 seconds i want to display the status of process like Download in Process, Watching the Folder, No file found/ if found, Process started for file no.1/ Copying the file to server, sending e-mail. So that user will know there is some processing happning in tool.

Any help will be much appreciated

Thanks in Advance.

Comment on Re^3: Perl TK threads using while

Replies are listed 'Best First'.
Re^4: Perl TK threads using while by zentara (Cardinal) on Feb 07, 2012 at 10:26 UTC
And every 3 seconds i want to display the status of process like Download in Process, Watching the Folder, No file found/ if found, Process started for file no.1/ Copying the file to server, sending e-mail. Thats a pretty big request considering the code you posted. It would take me all day to properly write and test such a script. This is not a script writing service. My advice, is to break your program down into smaller parts, and get each working separately, then work on combining them. If you want to do something every 3 seconds, use a timer. `use Tk; my $timer = $mw->repeat( 3000, \&my_sub);` [download] I'm not really a human, but I play one on earth. Old Perl Programmer Haiku ................... flash japh	[reply] [d/l]

Replies are listed 'Best First'.

Re^4: Perl TK threads using while
by zentara (Cardinal) on Feb 07, 2012 at 10:26 UTC

Thats a pretty big request considering the code you posted. It would take me all day to properly write and test such a script. This is not a script writing service.

My advice, is to break your program down into smaller parts, and get each working separately, then work on combining them. If you want to do something every 3 seconds, use a timer.

use Tk;
my $timer = $mw->repeat( 3000, \&my_sub);
[download]

I'm not really a human, but I play one on earth.
Old Perl Programmer Haiku ................... flash japh

[reply]
[d/l]