Also folgenes Problem ich hab ein Script geschrieben das mir eine Seite auslesen soll das mach es auch hier mal das Script

Code :

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33

Alias incs {   Sockopen incs 217.160.202.106 80   Set %incs $1-   }   On *:sockopen:incs: { if ($sockerr) { echo -a Es konnte keine Verbindung aufgebaut warden. Eventuell sind IP/Host oder Port nich korrekt. | halt } sockwrite -n $sockname GET $+(/mxc/includes/mxc_irc_test.html) HTTP/1.1 sockwrite -n $sockname Host: 217.160.202.106 $+ $str($crlf,2) }   On *:sockread:incs: {   Sockread %data   Tokenize 32 %data   update_incs   Echo –a $1-   } On *:sockclose:incs: { echo –a Disconnected from page }   alias update_incs { set %incs $deltok(%data,2,62) set %incs $left(%incs,$calc($len(%incs) - 3))) msg #testing %incs }

Nur wenn ich jetzt das Script starte bekomme ich zwar das was ich will
nur wird noch etwas anderes gepostet was ich nicht will und zwar das

Code :

1 2 3 4 5 6 7 8

HTTP/1.1 200 Date: Thu, 15 Jul 2004 20:22:22 Server: Apache/1.3.27 (Win32) mod_perl/1.25 mod_ssl/2.8.14 OpenSSL/0.9 Last-Modified: Thu, 15 Jul 2004 20:06:27 ETag: "0-1b4-40f6e3 Accept-Ranges: by Content-Length: Content-Type: text/h

und das möchte ich nicht drine haben
kann mir da jemand helfen wie das nicht gepostet wird ?
wäre net

Das Zweite Problem ist das wenn ich den Post bekomme fehlen immer 3 stellen hinten am ende des satzes nur wenn ich den befehl

set %incs $left(%incs,$calc($len(%incs) - 3)))

rausnehme zeigt er mit die
html tags an zb. zeigt er mir <br> an


hier mal den kompletten Post

Code :

1 2 3 4 5 6 7 8 9 10 11 12 13

HTTP/1.1 200 Date: Thu, 15 Jul 2004 20:22:22 Server: Apache/1.3.27 (Win32) mod_perl/1.25 mod_ssl/2.8.14 OpenSSL/0.9 Last-Modified: Thu, 15 Jul 2004 20:06:27 ETag: "0-1b4-40f6e3 Accept-Ranges: by Content-Length: Content-Type: text/h I XXX:XX Name | wird angegriffen von XXX:X Nick | Deffer : XXX:X Name, XXX:X Name, XXX:X N XXX:XX Name  | wird angegriffen von XXX:X Nick | Deffer : XXX:X Name, XXX:X Name, XXX:X N XXX:XX Name  | wird angegriffen von XXX:X Nick | Deffer : XXX:X Name, XXX:X Name, XXX:X N XXX:XX Name  | wird angegriffen von XXX:X Nick | Deffer : XXX:X Name, XXX:X Name, XXX:X N

hoffe das ihr verstanden habt was ich meine

thx

Code :

1 2 3 4 5 6 7 8 9 10 11 12 13

alias incs {   if ($sock(incs,status) != 1) sockopen incs 217.160.202.106 80 } on 1:sockopen:incs:{   sockwrite -n $sockname GET /mxc/includes/mxc_irc_test.html HTTP/1.1   sockwrite -n $sockname User-Agent: mIRC v $+ $version   sockwrite -n $sockname Host: $sock($sockname).ip   sockwrite -n $sockname $crlf } on 1:sockread:incs:{   sockread %sck.incs   if (*| wird*von* iswm %sck.incs) echo 9 %sck.incs }

Einfach eine if-Abfrage ob die Zeile vom Aufbau her den gewünschten entspricht.