egghelp/eggheads community Discussion of eggdrop bots, shell accounts and tcl scripts. 2005-01-15T15:46:50-04:00 https://forum.eggheads.org/app.php/feed/topic/8987 2005-01-15T15:46:50-04:00 2005-01-15T15:46:50-04:00 https://forum.eggheads.org/viewtopic.php?p=45420#p45420 <![CDATA[Jump to line]]>

Code: 

set data "RANDOM0\nConstant\nRANDOM1\nRANDOM2\nRANDOM3\nRANDOM4\nRANDOM5"if {[set a [lsearch -exact [set b [split $data \n]] "Constant"]] != -1} {   putlog "constant: [lindex $b $a]"  putlog "random4: [lindex $b [expr $a + 4]]"}
produces:
constant: Constant
random4: RANDOM4
however, at second glance, it seems you want to check if "Constant" is in the line, rather than if the line equals "Constant". Try replacing -exact with -glob for the lsearch, and setting the pattern to "*Constant*".

Statistics: Posted by spock — Sat Jan 15, 2005 3:46 pm

]]> 2005-01-15T14:51:03-04:00 2005-01-15T14:51:03-04:00 https://forum.eggheads.org/viewtopic.php?p=45414#p45414 <![CDATA[Jump to line]]> Statistics: Posted by micky — Sat Jan 15, 2005 2:51 pm

]]> 2005-01-15T12:50:15-04:00 2005-01-15T12:50:15-04:00 https://forum.eggheads.org/viewtopic.php?p=45410#p45410 <![CDATA[Jump to line]]>

Code: 

if {[set a [lsearch -exact [set b [split [egghttp:data $sock] \n]] "Constant"]] != -1} { putlog "random4: [lindex $b [expr $a + 4]]" }

Statistics: Posted by spock — Sat Jan 15, 2005 12:50 pm

]]> 2005-01-15T09:55:24-04:00 2005-01-15T09:55:24-04:00 https://forum.eggheads.org/viewtopic.php?p=45406#p45406 <![CDATA[Jump to line]]>

Code: 

RANDOM0Constant  RANDOM1 RANDOM2RANDOM3 RANDOM4RANDOM5
Code:

Code: 

foreach line [split [egghttp:data $sock] \n] {if {[string match "*Constant*" $line]} {putlog "$line"# And i need to write line RANDOM4}}
thx

Statistics: Posted by micky — Sat Jan 15, 2005 9:55 am

]]>