Versteckte Funktionen von TCL/TK

Question

Ich habe mit TCL/TK gearbeitet, vor kurzem begonnen, TCL/TK mit meinen Automatisierungsanwendungen zu verwenden, und ich bin hungrig nach Wissen.

mit der langen Reihe der versteckten Feature Fragen fortzusetzen, würde Ich mag keine versteckten oder praktische Funktionen von TCL/TK oder jeder einfachen Methode wissen, einige großen Operationen

Answer 1

Wenn ein Marketing-Mann bei Sun erreichen erklärte, Tcl „Enterprise Ready“ war, fügten die Entwickler die folgende Funktion:

$ tclsh 
% clock format [clock seconds] -format %Q 
Stardate 63473.2 

Answer 2

Eine praktische Funktion, die nicht versteckt wird, neigt dazu, aber nicht offensichtlich aus anderen Sprachen kommen, um Menschen zu sein, ist, dass Sie Ihre eigenen Kontrollstrukturen definieren können (oder definieren Sie sogar die vorhandenen neu, wenn Sie gefährlich leben möchten). Es gibt Beispiele auf der

Answer 3

Meine Lieblings "versteckte oder praktische Funktion" ist, wie zitiert in Tcl arbeitet. Ich verwende gerne den Ausdruck "Zitat ist ein Werkzeug, keine Regel". Ich mag auch „nur Sie geschweiften Klammern benötigen, wenn Sie geschweifte Klammern müssen“ sagen

Während die meisten Sprachen haben Regeln für die Blocktrennzeichen müssen (zum Beispiel für bestimmte Dinge verwendet werden, in C müssen Sie verwenden {} zu bezeichnen einen Block), Tcl ist nicht so streng.

Mit Tcl können Sie auswählen, welche Zitierzeichen Ihnen den gewünschten Effekt geben. Es gibt sicherlich Best Practices, aber am Ende müssen Sie den Anführungszeichen auswählen, mit dem Sie die Aufgabe am besten erledigen können.

Das bedeutet zum Beispiel, können Sie ein Verfahren in vielerlei Hinsicht definieren, einschließlich:

proc foo {args} { 
    .... body here .... 
} 

proc foo "args" " 
    .... body here .... 
" 

proc foo args [some code that returns the body] 

... und so weiter. Gleiches gilt für bedingte Anweisungen, Schleifen und alles andere. (Für Nichteingeweihte sind geschweifte Klammern in etwa gleichbedeutend mit dem einfachen Anführungszeichen der Shell, doppelte Anführungszeichen sind wie das doppelte Anführungszeichen der Shell und eckige Klammern sind wie der Shell-Backtick.).

Jetzt schauen sich viele Leute das an und sagen WTF? aber es gibt dem Programmierer wirklich viel Kraft. Wir bekommen oft Fragen in comp.lang.tcl nach dem Motto "Wenn ich 'this {und $ that}' mache, wie bekomme ich $, das erweitert werden soll?". Die Antwort folgt dem alten Witz "Patient: Doktor, es tut weh, wenn ich diesen Arzt mache: Tu das nicht". Das heißt, wenn Sie das Verhalten, das Sie mit einem Satz Trennzeichen erhalten, nicht mögen, wählen Sie ein anderes Trennzeichen. Nur weil eine if-Anweisung normalerweise mit geschweiften Klammern konstruiert wird, heißt das nicht, dass sie mit geschweiften Klammern erstellen muss.

Das ist meine Lieblings "versteckte" Funktion von Tcl. Es ist nicht versteckt - es ist direkt auf der wunderbar vollständigen, aber prägnanten Tcl (n) man-Seite, aber die Auswirkungen sind nicht klar, bis Sie vollständig wissen, wie Tcl funktioniert.

Answer 4

Ein weiteres nicht offensichtliches Merkmal ist, dass nicht erkannte Befehle an einen Handler mit der Bezeichnung "unbekannt" weitergegeben werden, den Sie neu definieren können. Z.B. behandelt unbekannte Befehle als Ausdrücke haben zu bewerten:

$ tclsh 
% 2+2 
invalid command name "2+2" 
% proc unknown args {uplevel 1 [linsert $args 0 expr]} 
% 2+2 
4 

Weitere Beispiele auf der Wiki-Seite auf Radical Language Modification

Answer 5

IMHO die größte verstecktes Feature von Tcl zu finden sind seine C API. Mit diesem ist, es ist wirklich einfach zu wickeln ein Kern-C-Programm oder -Subsystem und schreibe eine GUI oder andere Funktionalität in Tcl.Obwohl diese Funktion nicht nur für Tcl gilt, wurde Tcl von Grund auf dafür entwickelt und die C API ist besonders einfach zu bedienen.

Das zweitgrößte versteckte Feature ist der packer, der Großvater aller Geometrie-Manager. Damit kann eine GUI große Fenster mit erstaunlich wenig Code haben. Es ist wichtig zu beachten, dass Tcl/Tk Geometrie-Management mindestens 10 Jahre zuvor hatte .net kam heraus.

Das drittgrößte Merkmal von Tcl ist die Möglichkeit, die Sprache entweder über die C-API oder mit in Tcl definierten Befehlen zu erweitern. Nicht ganz LISP-Makros, aber dennoch ziemlich flexibel. Expect ist ein sehr gutes Beispiel für eine Anwendung, die auf der Erweiterung der basse Tcl-Sprache basiert, um eine domänenspezifische Skriptsprache zu erstellen.

EDIT: gut, hau mich, Xt really did have a geometry manager, obwohl ich mit Nat, dass es etwas schmerzhafter als Pack zustimmen; -}

Answer 6

Tcl ist so eine einfache, offene Sprache gibt es sehr wenig versteckten Funktionen . Es ist alles offen für den Programmierer zu erweitern und anzupassen.

Answer 7

Alle Schlüsselwörter von Tcl sind reguläre Tcl-Befehle, einschließlich Kontrollstrukturen wie [for], [foreach], [while] usw. Dies bedeutet, dass Sie die Sprache durch Schreiben neuer Kontrollstrukturen in reinem Tcl-Code erweitern können . Die try/on/trap Struktur wurde beispielsweise in Tcl 8.6a unter Verwendung von nur Tcl-Code implementiert. Ähnlich enthält tcllib control :: do, eine do/while Kontrollstruktur.

Eine Menge davon wird durch die Befehle [upvar] und [uplevel] ermöglicht, mit denen Sie auf Variablen zugreifen oder Code in einem anderen Stack-Frame ausführen können.

Answer 8

Der Tcl-Befehl [trace] ermöglicht das Abfangen von Lese- und Schreibvorgängen für beliebige Variablen. Auf diese Weise können Sie einen Beobachter für jede Variable implementieren und jeder Variablen eine automatische Bereichsüberprüfung beliebiger Komplexität hinzufügen (als ob Sie über einen Setter/Getter auf die Variable zugegriffen hätten). Sie können auch automatisch inkrementierende Variablen mit dieser Technik erstellen.

proc varlimit_re {re var key op} { 
    upvar $var v 
    if { [regexp -- $re $v] <= 0 } { 
    error "$var out of range" 
    } 
} 

trace add variable ::myvar {write} [list varlimit_re {^[A-H]\d{3}-[0-9a-f]+$}]` 

Wenn Sie versuchen, 'myvar' auf etwas zu setzen, das nicht mit dem regulären Ausdruck übereinstimmt, erhalten Sie einen Laufzeitfehler.

Answer 9

Die gut dokumentierte C-API ermöglichte auch eine einfache Integration in Perl. Meine Erfahrung mit Tcl/Tk geht zurück bis 1995, aber im Jahr 2000 entdeckte ich Perl/Tk und schaute nie zurück.

Und in letzter Zeit, die Tcl und Tkx Perl-Pakete geben uns modern aussehende GUI's. Und die beiden oben genannten Module sind zwar nicht trivial, beinhalten aber relativ wenig Code, wenn man berücksichtigt, was man über Sprachgrenzen hinweg tun kann. Und das kann direkt der ausgezeichneten API (und natürlich der Macht von Perl) zugeschrieben werden.

Answer 10

1. [array names] ist eine der ersten Fragen, Neulinge zu fragen, wie
2. auch über ein Array zu durchlaufen, die Tatsache, dass man foreach {key1 key2} {$list1 $list2} {...} - auch wenn die Listen sind von unterschiedlicher Größe
3. Sie nicht Kommentare verwenden sollten zwischen Schalter Fällen (dies kein cooles Feature ist aber ein Problem, die meisten Entwickler nicht verstehen
4. der rename Befehl umbenennen kann eine beliebige Funktion/proc

Answer 11

Ich denke, der time Befehl ist wunderbar. Es ist nicht genau versteckt, aber das hindert die Leute nicht, in comp.lang.tcl ab und zu zu fragen, welche Funktion schneller ist.

Wann immer Sie wissen wollen "wie lange dauert das?" oder "welche Methode ist schneller?" Sie rufen es einfach über den Befehl "time" an. Kein Erstellen von Objekten, keine Mathematik, kein Overhead, außergewöhnlich einfach. Andere Sprachen haben eine ähnliche Funktion, obwohl einige etwas weniger elegant sind.