Hi all, I have a perl/Tk application which lists files and updates disk usage every 5 minutes. At the moment, I have the following, but its seems rather clunky and the GUI itself does not have a very fluid feel to it. Is there a better way? Regards, Stacy. &disk_space; #check disk space &refresh_tally; #refresh GUI my $counter = 300; while (1) { #always true $counter -= 1; $frame->update; sleep 1; unless ($counter > 0) { &disk_space; &refresh_tally; $frame->update; $counter = 300; #reset counter } $frame->update; } MainLoop;
In reply to Updating perl/Tk fluid-like by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |