egghelp/eggheads community

compare two files

2005-12-10T12:48:33-04:00

Oh, I agree, writing it in tcl would be far more fun - just thought I would offer an 'obvious' alternative.

Statistics: Posted by Ehlanna — Sat Dec 10, 2005 12:48 pm

compare two files

2005-12-10T12:18:12-04:00

Doing this through [file] is better for the performance and why use [exec] when you can do it through Tcl?

Statistics: Posted by Sir_Fz — Sat Dec 10, 2005 12:18 pm

compare two files

2005-12-10T05:37:28-04:00

Just a very silly thought on this ... how about using the command to shell out and run an OS sommand - is it exec? - and invoking the diff command? Why reinvent the wheel?

Statistics: Posted by Ehlanna — Sat Dec 10, 2005 5:37 am

compare two files

2005-12-09T16:01:16-04:00

Yes you can use lsearch to search through the list, as for deleting check your permissions.
Sorry but how check permisions

For "lsearch" , Which is for you the fastest way ?

thx

look at file attributes & file owned

tho i would just check there md5 against eachother.. if it doesn't match then i would go and compare.. and do all the rest .. ( if the files arn't big files.. ofcourse..)

Statistics: Posted by Ofloo — Fri Dec 09, 2005 4:01 pm

compare two files

2005-12-09T14:34:26-04:00

Yes you can use lsearch to search through the list, as for deleting check your permissions.

Sorry but how check permisions

For "lsearch" , Which is for you the fastest way ?

thx

Statistics: Posted by romain — Fri Dec 09, 2005 2:34 pm

compare two files

2005-12-09T13:58:59-04:00

Yes you can use lsearch to search through the list, as for deleting check your permissions.

Statistics: Posted by Sir_Fz — Fri Dec 09, 2005 1:58 pm

compare two files

2005-12-09T11:19:50-04:00

Ok thx i try.

it's not possible to use "lsearch" for verifier the data?

And i have

Code:

file delete -force -- scripts/file1.txt file rename -force -- scripts/file2.txt scripts/file1.txt

[17:10] Tcl error [pub:aj]: error deleting "scripts/file1.txt": permission denied

Statistics: Posted by romain — Fri Dec 09, 2005 11:19 am

compare two files

2005-12-09T10:10:08-04:00

That would probably cause in lappending the same line several times into the list. Try this:

Code:

foreach a [split [read [open $file1] \n] {  set f 0 foreach b [split [read [open $file2] \n] {   if {[string equal $a $b]} {    # Found it, so we set f to 1 and we break this 2nd loop   set f 1   break  } } # if f is still 0, then there's no match and we add $a to the list if {!$f} { lappend c $a }}

And don't forget to close the files after finishing from them.

Statistics: Posted by Sir_Fz — Fri Dec 09, 2005 10:10 am

compare two files

2005-12-09T08:33:55-04:00

Yes but,

with

Code:

  foreach a [split [read [open $file1] \n] {    foreach b [split [read [open $file2] \n] {     if [string equal $a $b] {       continue     } else {       lappend c $a     }    }   }

Don't works

Statistics: Posted by romain — Fri Dec 09, 2005 8:33 am

compare two files

2005-12-09T07:04:07-04:00

You can take the line from file1 and check if it exists in file2, if not then write it to the file and repeat that on each line.

Statistics: Posted by Sir_Fz — Fri Dec 09, 2005 7:04 am

compare two files

2005-12-09T04:58:55-04:00

hello,

I've 2 files(file1,file2),have the same number of lines,30 lines max.I want to write data which are in the file1 but which is not in the file2.I try use foreach 2 time but I've many difficulties to write these data.Can you help me in the realization of this script?Thx

Statistics: Posted by romain — Fri Dec 09, 2005 4:58 am