Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re: Tk POE SSL Win32 help

by hiseldl (Priest)
on Jul 30, 2003 at 13:14 UTC ( #279170=note: print w/replies, xml ) Need Help??

in reply to Tk POE SSL Win32 help

If you just want Tk to get updated, you can add update after you insert your text. e.g.

sub send { tie (*SSL, "Net::SSLeay::Handle", "", "443") or die "error in tie\n"; if (\*SSL) { print SSL "GET http://index.html \r\n"; } while (my $buf = <SSL>) { $txt->insert('end',$buf); ##### Update the Text Widget $txt->update; } }
Or, if you want to update Tk while it is in a loop, possibly only idling, then try putting $mw->DoOneEvent; inside the loop. This may be what you need to do to get your app working with POE.


What time is it? It's Camel Time!

Replies are listed 'Best First'.
Re: Re: Tk POE SSL Win32 help
by JamesNC (Chaplain) on Jul 30, 2003 at 13:27 UTC
    Thanks for the suggestion. I tried your suggestion in the blocking example and also in the non-blocking example and it did not make a difference. But I appreciate the input.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://279170]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (9)
As of 2018-03-21 15:00 GMT
Find Nodes?
    Voting Booth?
    When I think of a mole I think of:

    Results (268 votes). Check out past polls.