very simple question in tcl

[ee1]

Hi i am writing a simple script,
all i want to to is read a file and print its lines.

the script:

#!/bin/csh
set fid [open my_file.dat r+]
while {![eof $fid]} {
set line [gets $fid]
puts $fid
}
close $fid

and when i run :
source my_script.tcl
i am getting:
"set: Variable name must begin with a letter."

what am i doing wrong?...
thanks.

 

[feherke]

Hi

#!/bin/csh

Unless you renamed your Tcl interpreter, that should be [tt]#!/usr/bin/tclsh[/tt] or something similar.


Feherke.

http://free.rootshell.be/~feherke/

 

[Bong]

you have:
puts $fid

but I think you want:
puts $fid $line

_________________
Bob Rashkin

 

[ee1]

thanks!