| |
| |
| |
|
Page: 1 2 3 4
Comments:
<0> ;info globals
<1> fumanchi: #2 (443 clicks) Tcl: tcl_version tcl_interactive errorCode auto_path errorInfo env tcl_patchLevel auto_noexec tcl_platform tcl_library
<0> nice :)
<0> ;info hostname
<1> fumanchi: #4 (416 clicks) Tcl: Melody.Atlantica.US
<0> ;info nameofexecutable
<1> fumanchi: #5 (395 clicks) Tcl: /home/safetcl/eggdrop/eggdrop
<0> ;error ooops
<1> fumanchi: #6 (5459 clicks) Tcl error: ooops
<0> :)
<0> ;eval "set fp [open \"/etc/p***wd\" r]; puts [read $fp]; close($fp)"
<1> fumanchi: #8 (655 clicks) Tcl error: open is disabled.
<0> :(
<0> ;exit
<0> ?
<1> fumanchi: #10 (1649707 clicks) Tcl: Reset safetcl.
<0> ;history info
<1> fumanchi: #2 (8478 clicks) Tcl error: invalid command name "history"
<0> ;puts [http_get "http://www.kernel.org";]
<1> fumanchi: #3 (8534 clicks) Tcl error: invalid command name "http_get"
<0> ;history
<1> fumanchi: #4 (3438 clicks) Tcl error: invalid command name "history"
<2> what the hell you tryin to do?
<2> ;package require http
<1> [GRiMMY]: #6 (3866 clicks) Tcl error: invalid command name "::tclPkgUnknown"
<3> ;set errorInfo PWND
<1> Gotisch: #7 (206 clicks) Tcl: PWND
<4> anybody got an example on how to get info from a gameserver eg. how many players connected
<4> or wanna help me out :)
<5> anc: rather difficult in Tcl since it doesnt support UDP by default
<6> its not hard becasue of that, only on eggdrops :)
<5> why would eggdrops make it harder?
<6> doesnt like blocking stuff
<7> BL4DE .. pm
<5> uhm
<5> never heard about that, though
<5> http://www.aros.org/pictures/screenshots/20040308/pci.jpeg
<5> kewl
<3> ; set a "<a href=\"index.php?site=news§ion=comments&id=235&cat=0\">hallo du da 123</a>"
<1> Gotisch: #21 (215 clicks) Tcl: <a href="index.php?site=news§ion=comments&id=235&cat=0">hallo du da 123</a>
<3> unset a
<3> ; set a "<a href=\"index.php?site=news§ion=comments&id=235&cat=0\">hallo du da 123</a>"
<1> Gotisch: #23 (217 clicks) Tcl: <a href="index.php?site=news§ion=comments&id=235&cat=0">hallo du da 123</a>
<3> ;regexp -nocase -inline {<a href="index.php?site=news§ion=comments&id=\d+&cat=\d+">(.+?)</a>}
<1> Gotisch: #24 (599 clicks) Tcl error: wrong # args: should be "regexp ?switches? exp string ?matchVar? ?subMatchVar subMatchVar ...?"
<3> ;regexp -nocase -inline {<a href="index.php?site=news§ion=comments&id=\d+&cat=\d+">(.+?)</a>} $a
<1> Gotisch: #25 (4383 clicks) Tcl:
<3> ;regexp -nocase -inline {<a href="index.php?site=news§ion=comments&id=(.*?)">(.+?)</a>} $a
<1> Gotisch: #26 (8083 clicks) Tcl:
<3> ;regexp -nocase -inline {<a (.*?)>(.+?)</a>} $a
<1> Gotisch: #27 (1901 clicks) Tcl: {<a href="index.php?site=news§ion=comments&id=235&cat=0">hallo du da 123</a>} href=\"index.php?site=news§ion=comments&id=235&cat=0\" {hallo du da 123}
<3> ;regexp -nocase -inline {<a href="index\.php\?site=news\§ion=comments\&id=(.*?)">(.+?)</a>} $a
<1> Gotisch: #28 (5332 clicks) Tcl: {<a href="index.php?site=news§ion=comments&id=235&cat=0">hallo du da 123</a>} 235&cat=0 {hallo du da 123}
<3> ;regexp -nocase -inline {<a href="index.php\?site=news\§ion=comments\&id=\d+\&cat=\d+">(.+?)</a>} $a
<1> Gotisch: #29 (4532 clicks) Tcl: {<a href="index.php?site=news§ion=comments&id=235&cat=0">hallo du da 123</a>} {hallo du da 123}
<3> ;regexp -nocase -inline {<a href="index.php\?site=news§ion=comments\&id=\d+\&cat=\d+">(.+?)</a>} $a
<1> Gotisch: #30 (5957 clicks) Tcl: {<a href="index.php?site=news§ion=comments&id=235&cat=0">hallo du da 123</a>} {hallo du da 123}
<3> ;regexp -nocase -inline {<a href="index.php\?site=news§ion=comments\&id=\d+&cat=\d+">(.+?)</a>} $a
<1> Gotisch: #31 (11937 clicks) Tcl: {<a href="index.php?site=news§ion=comments&id=235&cat=0">hallo du da 123</a>} {hallo du da 123}
<3> ;regexp -nocase -inline {<a href="index.php?site=news§ion=comments\&id=\d+&cat=\d+">(.+?)</a>} $a
<1> Gotisch: #32 (3392 clicks) Tcl:
<8> puts a
<1> Shock^: #33 (stdout) a
<8> puts $a
<1> Shock^: #34 (stdout) <a href="index.php?site=news§ion=comments&id=235&cat=0">hallo du da 123</a>
<8> ;regexp {<a href=".*">(.+?)</a>} $a
<1> Shock^: #35 (6564 clicks) Tcl: 1
<8> ;regexp {<a href=".*">(.+?)</a>} $a $result ;puts $result
<1> Shock^: #36 (5524 clicks) Tcl error: can't read "result": no such variable
<8> ;regexp {<a href=".*">(.+?)</a>} $a result ;puts $result
<1> Shock^: #37 (stdout) <a href="index.php?site=news§ion=comments&id=235&cat=0">hallo du da 123</a>
<3> ;regexp {<a href=".*">(.+?)</a>} $a result ;puts -> $result; puts $result
<1> Gotisch: #38 (1030 clicks) Tcl error: bad channelId. =P
<3> ups
<3> ;regexp {<a href=".*">(.+?)</a>} $a -> result ;puts $result;
<1> Gotisch: #40 (stdout) hallo du da 123
<8> :)
<8> i missed the " "
<3> you missed the ->
<8> ah
<3> its always first arg string that matched 2 first submatch
<3> etc.
<3> ;regexp -nocase -inline {\d} "string123"
<1> Gotisch: #47 (657 clicks) Tcl: 1
<3> ;regexp -nocase -inline {(\d)} "string123"
<1> Gotisch: #48 (862 clicks) Tcl: 1 1
<3> ;regexp -nocase -inline {(\d+)} "string123"
<1> Gotisch: #49 (926 clicks) Tcl: 123 123
<8> ;set f "Chocolate Factory Step In The Name Of Love Heart Of A Woman I'll Never Leave Been Around The World (featuring Ja Rule) You Made Me Love You Forever Dream Girl Ignition Ignition (remix) Forever More You Knock Me Out Step In The Name Of Love (remix) Imagine That Showdown (featuring Ronald Isley) Snake (featuring Big Tigger) Who's That (featuring Fat Joe) Loveland What Do I Do Heaven I Need A Hug"
<1> Shock^: #50 (5331 clicks) Tcl: Chocolate Factory Step In The Name Of Love Heart Of A Woman I'll Never Leave Been Around The World (featuring Ja Rule) You Made Me Love You Forever Dream Girl Ignition Ignition (remix) Forever More You Knock Me Out Step In The Name Of Love (remix) Imagine That Showdown (featuring Ronald Isley) Snake (featuring Big Tigger) Who's That (featuring Fat Joe) Loveland W
<8> ;putserv "PRIVMSG #tcl :$f"
<1> Shock^: #51 (3515 clicks) Tcl error: invalid command name "putserv"
<8> ;putquick "PRIVMSG #tcl :$f"
<1> Shock^: #52 (3562 clicks) Tcl error: invalid command name "putquick"
<8> ;puts $f
<1> Shock^: #53 (stdout) Chocolate Factory Step In The Name Of Love Heart Of A Woman I'll Never Leave Been Around The World (featuring Ja Rule) You Made Me Love You Forever Dream Girl Ignition Ignition (remix) Forever More You Knock Me Out Step In The Name Of Love (remix) Imagine That Showdown (featuring Ronald Isley) Snake (featuring Big Tigger) Who's That (featuring Fat Joe) Loveland W
<8> what the most character a var can store ?
<8> and output
<8> Gotisch
<3> here?
<3> 400
<8> anywhere
<3> not limited afaik
<3> only by your mem
<3> afaik
<3> dunno
<8> well
<3> maybe something like 2gb
<8> what about that
<3> but i guess you cant even hold that in mem
<8> what ive just done misses off hat Do I Do Heaven I Need A Hug"
<8> on the puts
<3> puts here is limited
<8> on network u mean ?
<3> ;length "Chocolate Factory Step In The Name Of Love Heart Of A Woman I'll Never Leave Been Around The World (featuring Ja Rule) You Made Me Love You Forever Dream Girl Ignition Ignition (remix) Forever More You Knock Me Out Step In The Name Of Love (remix) Imagine That Showdown (featuring Ronald Isley) Snake (featuring Big Tigger) Who's That (featuring Fat Joe) Loveland W"
<1> Gotisch: #72 (3942 clicks) Tcl error: invalid command name "length"
<8> or on script
<3> ;string length "Chocolate Factory Step In The Name Of Love Heart Of A Woman I'll Never Leave Been Around The World (featuring Ja Rule) You Made Me Love You Forever Dream Girl Ignition Ignition (remix) Forever More You Knock Me Out Step In The Name Of Love (remix) Imagine That Showdown (featuring Ronald Isley) Snake (featuring Big Tigger) Who's That (featuring Fat Joe) Loveland W"
<1> Gotisch: #74 (498 clicks) Tcl: 401
<3> both
<3> the script limites it to 400
<3> network limits it to something else
<9> tcl variables are not limited
<9> I think
<8> ;string length "Chocolate Factory Step In The Name Of Love Heart Of A Woman I'll Never Leave Been Around The World (featuring Ja Rule) You Made Me Love You Forever Dream Girl Ignition Ignition (remix) Forever More You Knock Me Out Step In The Name Of Love (remix) Imagine That Showdown (featuring Ronald Isley) Snake (featuring Big Tigger) Who's That (featuring Fat Joe) Loveland What Do I Do Heaven I Need A Hug"
<1> Shock^: #80 (521 clicks) Tcl: 434
<9> I didnt try to store 40gb in a var
<8> ;string length "Intro Jappy Jap The Suite For Beaver (Part 1) The Suite For Beaver (Part 2) OST (feat Odel) Empty Bottles Of Water The Outrage The Hang Loose The Double K Show Tales Of Kidd Drunkadelic Keepin It Live The Dig The Heat Montego Slay The LA Song 8 Is Enuff Acid <span cl***="highlight">Raindrops</span> The Joyride The Breakdown"
<1> Shock^: #82 (680 clicks) Tcl error: extra characters after close-quote
<8> ;string length "Intro Jappy Jap The Suite For Beaver (Part 1) The Suite For Beaver (Part 2) OST (feat Odel) Empty Bottles Of Water The Outrage The Hang Loose The Double K Show Tales Of Kidd Drunkadelic Keepin It Live The Dig The Heat Montego Slay The LA Song 8 Is Enuff Acid <span cl***=\"highlight\">Raindrops</span> The Joyride The Breakdown"
<1> Shock^: #83 (535 clicks) Tcl: 361
<8> umm
<9> the network limits the "PRIVMSG #tcl :TEXT\r\n" (not sure if \r\n or \n\r)
<9> the whole message is defined per RFC1459 as 512 byte
<9> so TEXT is limited to ~496
<9> (512 byte max(
<8> umm
<8> so i will have to work out whats in teh var then divide it up
<8> or somethin
<3> it depends on the length of your nick too
<9> yes
<9> (and host)
<9> as every user on the channel get
<9> <- nick!user@host PRIVMSG #chan :TEXT\r\n
<3> ye exactly
<9> basically every user should get another text length then mhmm
<3> no
<3> because nick!user@host will be the one from the sender
<3> or ye
<9> oh sorry, right *g*
<3> you can make a longer line then me
Return to
#tcl
or
Go to some related
logs:
#gentoo
#debian
#beginner
mod_svn_dav+mod_dav
#stocks
colleges blocking myspace
#worldcup
#flash
how much suger in alcohol
#politics
|
|
