tcl

Embedding tcl in ruby

Is there any way to do this? It seems the only possible way to do this is by using ruby/tk and creating a tcl interpreter through that api. However, I'd like to use this on a system with no GUI (x windows). Am I out of options? Thanks ...

Choose interpreter TCL C API

I have a couple tcl interpreters on my system and i'd like to pick which one the C API for tcl uses. Is there a way to do this? Thanks! ...

What are cons on reading a file which already used for streaming to writing?

Wondering if one file is open for writing in and another programe is accessing it recursively in tcl. ...

How to debug a tcl script which is argument to an executable?

I have a application which takes tcl script as argument. I want to debug tcl script when the application processes it. My development environment consists of Dynamic Languages Toolkit along with Active state remote debugger -dbgp_tcldebug. I am able to debug the individual tcl scripts with this setup. I created a tcl project in eclips...

HTML text input and using the input as a variable in a script(tcl)/sql(sqlite)

Hello all, I'm very VERY new at this whole web thing. And I'm just very confused in general. Basically, what I want to do is take an input via text using HTML and adding that input to database, table trans. Should be simple but I am lost. <li>Transaction Number</li> <li><input type=|text| name=|tnumber| </li> // do i need to use...

Using Tcl DSL in Python

I have a bunch of Python functions. Let's call them foo, bar and baz. They accept variable number of string arguments and does other sophisticated things (like accessing the network). I want the "user" (let's assume he is only familiar with Tcl) to write scripts in Tcl using those functions. Here's an example (taken from Macports) th...

TCL How to read , extract and count the occurent in .txt file (Current Directory)

Hi Folks, I am beginner to scripting and vigorously learning TCL for the development of embedded system. I have to Search for the files with only .txt format in the current directory, count the number of cases of each different "Interface # nnnn" string in .txt file, where nnnn is a 4 to 32 digits max hexadecimal number and o/p of a tab...

How can I debug expect_before behaviour

I am relatively new to TCL / expect and mostly modifying existing code. expect_before doesn't seem to do what I expect (which is fine) but I can't work out how to debug it. I have used -d option and am now using exp_internal -f "argh.log" 1 to create a log file, but it isn't helping me. expect_before -info seems useful, but I am no...

how to write regular expression using proc in TCL to deal with following pattern ?

Hello Guys, I am new to TCL and seeking a help to deal with the following expression. I am getting the i/p string from the user to validate any of these strings below & no others in a line in CLI using procedure { GHI GII GJI GKI} and another tricky one is to write regexp to match only the characters which begin with alphabet A & end ...

Regular Expression TCL using procedure

Hey everybody, I am a novice TCL programmer. Here I go - My 1st post with stackoverflow forum. I would like to write a regular expression that matches any & only the strings starts with character A and ends with B. Whatever the characters coming inbetween should be displayed. For instance AXIOMB as an input from the user which starts ...

Help needed in writing regular expression -- TCL

Hello Everyone, Just seeking a favour to write a regular expression to match the following set of strings. I want to write an expression which matches all the following strings TCL i) ( XYZ XZZ XVZ XWZ ) Clue : Starting string is X and Z ending string is same for all the pairs. Only the middle string is differs Y Z V W. My trial: ...

NS2, Otcl: using a variable of an owned instance within a class

Hello all, I'm using NS2 to create some new classes in C++ and then link them to otcl. The linkage and everything works, but when I try to use the otcl variables in an object, I'm having a trouble. For example, suppose I have a class "Node" with the variable X. In the code I want to set this value and later on use it in some if-stateme...

When is ¦ not equal to ¦?

Background. I'm working with netlists, and in general, people specify different hierarchies by using /. However, it's not illegal to actually use a / as a part of an instance name. For example, X1/X2/X3/X4 might refer to instance X4 inside another instance named X1/X2/X3. Or it might refer an instance named X3/X4 inside an instance n...

Adding new "columns" to csv data file in Tcl

Hi All, I am dealing with a "large" measurement data, approximately 30K key-value pairs. The measurements have number of iterations. After each iteration a datafile (non-csv) with 30K kay-value pairs is created. I want to somehow creata a csv file of form: Key1,value of iteration1,value of iteration2,... Key2,value of iteration1,value ...

Extract 2 numbers preceded by two different strings from paragraph using Tcl Regular Expression

Hi, I need to extract two different numbers preceded by two different strings. Employee Id--> Employee16(I need 16) and Employee links--> Employee links:2 (I need 2). Source String looks like following: Employee16, Employee name is QueenRose Working for 46w0d Billing is Distributed 65537 assigned tasks, 0 reordered, 0 unassigned ...

Error finding tcl.init when running Git GUI

I get the following error message when I try to start the Git GUI: Error in Wish Can't find a usable init.tcl in the following directories: ... [list of directories follows, init.tcl is in the first one listed] This probably means that Tcl wasn't installed properly. I'm running Windows 7 and I'm sure this problem ...

in tcl, how do I replace a line in a file?

let's say I opened a file, then parsed it into lines. Then I use a loop: foreach line $lines {} inside the loop, for some lines, I want to replace them inside the file with different lines. Is it possible? Or do I have to write to another temporary file, then replace the files when I'm done? e.g., if the file contained AA BB and ...

Generate commands for SQL transaction with Tcl and sqlite

I am having trouble understanding how to create a SQL command batch say in a list and pass it on to sqlite for execution in a transaction. Basically what I do now is: sqlite3 db1 $dbFile db1 eval BEGIN foreach Key [array names myArray] { db1 eval {SQL statement involving $Key} } db1 eval COMMIT I was thinking of a means to genera...

How do you get the children of a Tk Widget?

How do tell a Tk widget to tell me what (or who as the case may be) its children are? Is there a command for this? For example given a canvas widget .cvs with a label, a button and other adornments ... How do interrogate the canvas? ...

sqlite use in tcl script over nfs (or.. how to make standalone sqlite3 which can be run over nfs)

I want to use an embed an sqlite database into an existing tcl application (migrated from flat-file). Currently; our tcl interpreter is run from a network location; <nfs share>/bin/tclsh8.3 I do have an nfs $PATH for executables set for all users already; I am assuming I can place a standalone sqlite3 executible there; though I have b...