Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl Monk, Perl Meditation
 
PerlMonks  

RE: Perl/Tk Chatterbox Client

by $code or die (Deacon)
on Oct 28, 2000 at 19:57 UTC ( #38921=note: print w/ replies, xml ) Need Help??


in reply to Perl/Tk Chatterbox Client

I had a problem using this script - it wouldn't let me log in because I have spaces in my username ('$code or die').

I had to make a change to line 326 - in the runserver sub. It's looking for the following: /^LOGIN: (\S+) (\S+)$/ Which wouldn't work in my case because it will find: 'LOGIN: $code or die ****' so it thinks that 'or' is my password and there are things after it.

I guess that most PerlMonks users have a one-word username, but I found that the following modification will work for me and anyone else:

/^LOGIN: (.+) (\S+)$/ I hope that spaces aren't allowed in passwords too - otherwise you'll have to do this without a regex.

Another way around this would be to change the line (1057) in the Ok_Click sub:
&getFromServer("LOGIN $un $pw");
to something like : &getFromServer("LOGIN $un-:-$pw");

Then you could change the regex above to: /^LOGIN: (.+)-:-(.+)$/

-:- is probably not a very good delimiter but it would probably work.

Anyway - apart from that - monkchat is great - I love it!

UPDATED: changed the regex strings from (.*) to (.+).


Comment on RE: Perl/Tk Chatterbox Client
RE: RE: Perl/Tk Chatterbox Client
by Shendal (Hermit) on Oct 30, 2000 at 20:41 UTC
    Thanks for pointing this out. I have fixed the bug, and the fix will be included in the next released version (probably in the next few days).

    Cheers,
    Shendal

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://38921]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (11)
As of 2014-08-22 12:27 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The best computer themed movie is:











    Results (156 votes), past polls