Breve Manual Tcl

Breve manual de Tcl
Sergio Herrer´ıa Alonso
10 de diciembre de 2004
1.

Introducci´
on a Tcl

Tcl (Tool Command Language) es un lenguaje de programaci´on de comandos muy popular
para el desarrollo de peque˜
nas aplicaciones en entornos UNIX (aunque tambi´en existe una
versi´on disponible para Windows). Permite programar de forma r´apida y sencilla aplicaciones
no demasiado complejas. Sin embargo,la velocidad de ejecuci´on de ´estas no ser´a muy elevada
ya que nos encontramos ante un lenguaje interpretado y no ante un lenguaje compilado.
Una caracter´ıstica muy importante de este lenguaje es la facilidad con la que se pueden
a˜
nadir nuevos comandos a los ya existentes en el Tcl est´andar. Estos nuevos comandos pueden
implementarse utilizando el lenguaje de programaci´on C e integrarse demanera sencilla en
Tcl. As´ı, se han escrito bastantes extensiones para la realizaci´on de ciertas tareas comunes
como, por ejemplo, OTcl (Tcl orientado a objetos) o Tk (que permite crear interfaces gr´aficas
de usuario).
Se pueden ejecutar comandos Tcl de dos modos:
1. Modo interactivo: directamente, a trav´es del int´erprete de comandos tclsh, se pueden
introducir y ejecutar comandos Tcl deforma interactiva.
2. Modo no interactivo: los comandos se guardan en un fichero. Se pueden ejecutar de dos
maneras:
Llamando al int´erprete de comandos de Tcl pas´andole como par´ametro el nombre
del fichero.
Ejecutando directamente el fichero de comandos. Para que esto sea posible, la
primera l´ınea del fichero debe incluir el path hacia el int´erprete de comandos
(por ejemplo, #!/usr/bin/tclsh).Adem´as, el fichero tiene que tener los permisos
adecuados (permiso de ejecuci´on).
Este documento no pretende ser una guia completa del lenguaje Tcl. Simplemente, se ofrece
como manual de ayuda para la realizaci´on de las pr´acticas de la asignatura Sistemas de Conmutaci´
on. Para obtener m´as informaci´on sobre c´omo utilizar un determinado comando Tcl,
se recomienda consultar la p´agina mancorrespondiente (man n comando) o cualquier libro
que describa este lenguaje [1, 2].

2.

Variables y valores

Tcl trata principalmente con cadenas de texto (strings). Cuando es necesario (por ejemplo,
a la hora de realizar operaciones aritm´eticas), Tcl convierte autom´aticamente los strings en
n´
umeros.
Para crear una variable y asignarle un valor se utiliza el comando set:

1

% s e t a 100Cuando el s´ımbolo $ precede al nombre de una variable, el int´erprete sustituye dicha
variable por su valor. Por ejemplo:
% p u t s $a
100
Para realizar operaciones aritm´eticas se utiliza el comando expr:
% expr 2∗ $a
200
Una cadena contenida entre corchetes ([cadena]) se considera que es un comando: la cadena
se eval´
ua como si fuese un comando Tcl y se sustituye por el resultado obtenido. Esto noocurre si la cadena est´a entre comillas (“cadena”). Para ejecutar realmente dicha cadena se
requiere el comando eval:
% s e t b [ expr 2∗ $a ]
200
% s e t b ” expr 2∗ $a ”
expr 2∗100
% e v a l $b
200

3.

Estructuras de control

Los comandos de control de flujo son similares a sus equivalentes en el lenguaje C. Los principales operadores de comparaci´on son: <, >, <=, >=, ==, !=, &&, ||, !. Losejemplos
siguientes pueden ser u
´tiles para ilustrarnos en la utilizaci´on de estos comandos.
if
% set i 1
% i f { $ i <0} {
puts ” Negativo ”
} e l s e i f { $ i ==0} {
p u t s ” Cero ”
} else {
puts ” P o s i t i v o ”
}
Positivo
for
% f o r { s e t i 1} { $ i <=3} { i n c r i } {
puts $ i
}
1
2
3
El comando break finaliza la ejecuci´on del bucle inmediatamente. El comando continue
fuerza a quese ejecute la iteraci´on siguiente (evidentemente, siempre y cuando se cumpla la condici´on de continuaci´on del bucle).

2

while
% set i 1
% w h i l e { $ i <=3} {
puts $ i
incr i
}
1
2
3

4.

Operaciones con cadenas de texto
string length
Devuelve el n´
umero de caracteres que forman una cadena.
% s t r i n g l e n g t h ”ABCD”
4
string index
Devuelve el car´acter situado en una determinada...