LWP::UserAgent ?: Gtchat Messages ... (Netzwerkprogrammierung und Netzwerke mit Perl)

[thread]4360[/thread]

LWP::UserAgent ?: Gtchat Messages ...

Leser: 1

jan

2003-09-19 00:30

User since
2003-08-04
2536 Artikel
ModeratorIn

ja, idee hab ich. du musst schauen, welche urls aufgerufen werden, in welchem rhytmus (damit du den server nicht gleich bombardierst) etc.

BrownWolf

2003-09-19 03:17

User since
2003-08-15
308 Artikel
BenutzerIn
[default_avatar]

Mir ist grad ne bessere Idee eingefallen.
Damits wirds sicher einfacher sein ....

BrownWolf

Code (perl): ()

1
2
3

sub _{s;;xrqIpiql\\{}p{pl{R>rl{N{}gjwpkssq]>rl{N;;;*{{}=*{_};;
&#36{{}={q{{{}}}=>[reverse+split+reverse+q;}{;]};&#36{{}->{q{{{}}}}->[@{{}];}
&#36{{}=reverse+_(q{{}}=>q{{}})^chr(30)x+length&_(q{{}}=>,q{{}})and+print;

BrownWolf

2003-09-19 00:11

User since
2003-08-15
308 Artikel
BenutzerIn
[default_avatar]

Hallo,

ich habe eine schwierige Aufgabe für euch die ich persönlich nicht lösen kann.
Also ihr kennt doch bestimmt GTChat oder ?
Wenn man sich einloggt hat man dann ne Session ID und die URL sieht so ungefähr aus: http://www.xxx.de/?id=xxxx&language=&action=messages

Jetzt werden dort ja Nachrichten geschrieben. Ich möchte jetzt mit einem Script zu dieser Adresse connecten und auf neue Messages warten.

Ich weiss nicht wie ich das anstellen soll. Vielleicht mit LWP::UserAgent ?
Aber wenn ich das mache dann zeigt er mir nur an:

Willkommen BrownWolf,
Willkommen im Chat ....

Und dann beendet sich das Script ...
Mache ich eine While Schleife dann empfängt er immer wieder Wilkommen BrownWolf .....

Jemand ne Idee :-) ?

Code (perl): ()

1
2
3

sub _{s;;xrqIpiql\\{}p{pl{R>rl{N{}gjwpkssq]>rl{N;;;*{{}=*{_};;
&#36{{}={q{{{}}}=>[reverse+split+reverse+q;}{;]};&#36{{}->{q{{{}}}}->[@{{}];}
&#36{{}=reverse+_(q{{}}=>q{{}})^chr(30)x+length&_(q{{}}=>,q{{}})and+print;

BrownWolf

2003-09-19 03:03

User since
2003-08-15
308 Artikel
BenutzerIn
[default_avatar]

Ja,

ich habe das jetzt so gemacht das sich ein User mit LWP::UserAgent einloggt.
Ich kann auch per UserAgent Texte in den Chat senden.
Mich Ausloggen ....

Aber wie mache ich es das er auf neue Chattexte wartet ?
Ich bekomme immer nur den Anfang gesendet:

Code: (dl )

1
2

Willkommen im Moony Chat, BrownWolf!
Thema in diesem Raum: xxx

Danach gibt er immer dasselbe aus mit Schleife.
Es muss doch ne Möglichkeit geben den HTML Code auszulesen ....

Code (perl): ()

1
2
3

sub _{s;;xrqIpiql\\{}p{pl{R>rl{N{}gjwpkssq]>rl{N;;;*{{}=*{_};;
&#36{{}={q{{{}}}=>[reverse+split+reverse+q;}{;]};&#36{{}->{q{{{}}}}->[@{{}];}
&#36{{}=reverse+_(q{{}}=>q{{}})^chr(30)x+length&_(q{{}}=>,q{{}})and+print;

View all threads created 2003-09-19 00:30.