Perl Threads per Button steuern - #76409 (Allgemeines zu Perl)

vayu

2007-05-03 17:41

User since
2005-01-13
782 Artikel
BenutzerIn
[default_avatar]

Code: (dl )

-command=>\&SetKillFlag)->pack;

sub SetKillFlag{
    $killFlag = 1;
    
}

schön und gut, du setzt in der Funktion zwar ein flag ... aber du prüfst doch nirgendwo ob das flag gesetzt ist.

ich würd vorschlagen du musst sowas machen:

Code: (dl )

while( $count < 1000 and !$killFlag)

\n\n

"imitation is the sincerest form of flattery."
- Lee Anthony Iacocca
http://img156.imageshack.us/img156/2056/perluserba...
http://img410.imageshack.us/img410/2664/tcmduserba...