egghelp/eggheads community

change a line in a file

2009-09-19T06:54:17-04:00

It works fine.

Thank you very much

Statistics: Posted by HÒóme — Sat Sep 19, 2009 6:54 am

change a line in a file

2009-09-19T05:52:07-04:00

Since you have a specific line you wish to replace (3), then as demonstrated by arfer you can use [lreplace] to replace it.

Code:

# read data from fileset data [split [read [set id [open $file]]][close $id] \n]# replace 4th line (index 3)set data [lreplace $data 3 3 $changelineto]# rewrite the file with changed dataputs [set id [open $file w]] [join $data \n]close $id

Note that index 3 in Tcl means the 4th line (starting from 0).

Statistics: Posted by Sir_Fz — Sat Sep 19, 2009 5:52 am

change a line in a file

2009-09-19T02:09:16-04:00

I cant run it.... Or has any error in code, or i am doing some thing wrong...

Well... i wanted something like this:

Code:

bind pub - !line changelineproc changeline { nick uhost hand chan text } {set line "3"set file "scripts/script.tcl"set changelineto "$text"[[ Code to change the line ]]putserv "privmsg $chan :Changed"}

Statistics: Posted by HÒóme — Sat Sep 19, 2009 2:09 am

change a line in a file

2009-09-18T15:01:15-04:00

Code:

set oldline "This is how the line reads before replacement"set newline "This is how the line should read after replacement"set id [open filename.txt r]set data [split [read -nonewline $id] \n]close $idfor {set loop 0} {$loop < [llength $data]} {incr loop} {    if {[string equal $oldline [lindex $data $loop]]} {        lreplace $data $loop $loop $newline    }}set id [open filename.txt w]puts -nonewline $id [join $data \n]close $id

There are obviously variations on this theme. You might only know part of the line and need to use 'string match' or 'string match -nocase' or even a 'regexp' to determine if it is the line to be replaced.

You may also only require the first incidence of a line to be changed, in which case you would have to break out of the 'for' loop after finding it.

Statistics: Posted by arfer — Fri Sep 18, 2009 3:01 pm

change a line in a file

2009-09-18T14:57:03-04:00

There is loads ov posts about this on the forum, try search'ing for them, best bet would be this post thou http://forum.egghelp.org/viewtopic.php?t=6885

Statistics: Posted by TCL_no_TK — Fri Sep 18, 2009 2:57 pm

change a line in a file

2009-09-18T13:37:37-04:00

Hi.

How can i change a line in a file using eggdrop?

Thanks in advance

Statistics: Posted by HÒóme — Fri Sep 18, 2009 1:37 pm