Re: flash?

[email protected] Mon, 13 Nov 2006 16:10:41 +0100

Newsgroups	gmane.comp.lang.perl.tk
Message-ID	<[email protected]>

Anders Stegmann <[email protected]> wrote:
> Hi! 
> 
> Can anyone give me an example code of how TK's flash()
> function works with a button?
> That is, I what a button to flash.

Here's a oneliner:

perl -MTk -e '$b=tkinit->Button->pack;$b->repeat(1000,sub{$b->flash});MainLoop'


-- 
     __o		Slaven Rezic
   _`\<,_		slaven <at> rezic <dot> de
__(_)/ (_)____
______________________________________________________________________________
--++**==--++**==--++**==--++**==--++**==--++**==--++**==
ptk mailing list
[email protected]
https://mailman.stanford.edu/mailman/listinfo/ptk