Leer y Escribir Archivos con TcL

 

Leer y Escrbir archivos en TcL es bastante sencillo;

 

Para Leer un archivo.

 

proc leerArchivo archivo {
set f [open $archivo]
set datos [read $f]
close $f
return $datos
}

 

Para Escribir en un archivo. 

 

set ejemplo "Este es un ejemplo de escritura"
set fp [open Salida.out w]
puts $fp $ejemplo
close $fp

 

 

 

 

Read More >Leer y Escribir Archivos con TcL

Deja un comentario

This site uses Akismet to reduce spam. Learn how your comment data is processed.