10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
I need some help with regexp in tcl. The following code does work if the $urlvar ends in jpg,jpeg,png or gif. Eg, protocol(http/https)://testsite.com/images/image1.jpg
if { ! } {
//Do something
}
My problem is that if the URL does not end in these extensions this regexp is of no... (1 Reply)
Discussion started by: ampak
1 Replies
2. Shell Programming and Scripting
Hello everyone,
What is the difference between these two tcl commands:
(A) --> puts "ERROR!!! ${current_name}/${opt} is not found."
(B) --> puts "ERROR!!! $current_name/$opt is not found."
Are the braces needed to be put? Or both A and B has the same output? (5 Replies)
Discussion started by: mar85
5 Replies
3. Shell Programming and Scripting
Hello everyone,
I'm new in tcl scripting.
I'm currently studying a tcl script and came across this line:
regexp {(\d+)(\S?)} $opts match opt swi
According to my understanding, this line means to search in the opts variable for one or more digit, followed by a non-whitespace character... (2 Replies)
Discussion started by: mar85
2 Replies
4. Shell Programming and Scripting
how can i make a list with the n last files and their details in tcl?..
thanks. (0 Replies)
Discussion started by: eee
0 Replies
5. Shell Programming and Scripting
Hey,
Can anyone tell me what is the default tcl button color is?
I've already tried gray60/70/80/85/90/95.
None are the same.
Thanks,
Phil.
-----Post Update-----
You can disregard this question, found the color in #E0DFE3 (0 Replies)
Discussion started by: Phi01
0 Replies
6. Programming
Hello guys, please help me
I want to use TCl to move the lines with line number as odd number to a new file source_odd.txt, and move the lines with character 'a' to another file source_a.txt.
I also want to create a tcl function to list all the file names in a appointed directory. (1 Reply)
Discussion started by: kunleoyafajo
1 Replies
7. Shell Programming and Scripting
Hello,
Can someone explaine me the meaning of this program:
#! /usr/bin/tclsh
set mctal
set a
set b
set c
set d
set e
while {! line cell]} {
}
while {! line]} {
}
while {! line cell]} {
}
while {! line]} {
} (0 Replies)
Discussion started by: jolecanard
0 Replies
8. Shell Programming and Scripting
Does any one know how to capture the output of command called from a TCL script?
I cannot figure this out. I've been working on it for 4 hours now :confused: (2 Replies)
Discussion started by: Lorna
2 Replies
9. Shell Programming and Scripting
Hello Tcl Experts,
set i 0
while { $i < 10 } {
puts "$i"
incr i
}
I am trying to print the value of "i" at the same place. i.e. it should first print "1", then in next iteration print "2" over the location of "1" and so on.... (i.e. in every iteration, delete the previous number and... (2 Replies)
Discussion started by: sumitgarg
2 Replies
10. Shell Programming and Scripting
can someone tell my why the puts is not reflecting the variable?
CUT -->
set fp
while {-1 != } {
button .a${line} -text "${line} " -width 20 -command {
puts $line
}
pack .a${line}
} (0 Replies)
Discussion started by: hpuxrox
0 Replies
scope(n) [incr Tcl] scope(n)
__________________________________________________________________________________________________________________________________________________
NAME
scope - capture the namespace context for a variable
SYNOPSIS
itcl::scope name
_________________________________________________________________
DESCRIPTION
Creates a scoped value for the specified name, which must be a variable name. If the name is an instance variable, then the scope command
returns a string of the following form:
@itcl object varName
This is recognized in any context as an instance variable belonging to object. So with itcl3.0 and beyond, it is possible to use instance
variables in conjunction with widgets. For example, if you have an object with a private variable x, and you can use x in conjunction with
the -textvariable option of an entry widget. Before itcl3.0, only common variables could be used in this manner.
If the name is not an instance variable, then it must be a common variable or a global variable. In that case, the scope command returns
the fully qualified name of the variable, e.g., ::foo::bar::x.
If the name is not recognized as a variable, the scope command returns an error.
Ordinary variable names refer to variables in the global namespace. A scoped value captures a variable name together with its namespace
context in a way that allows it to be referenced properly later. It is needed, for example, to wrap up variable names when a Tk widget is
used within a namespace:
namespace foo {
private variable mode 1
radiobutton .rb1 -text "Mode #1" -variable [scope mode] -value 1
pack .rb1
radiobutton .rb2 -text "Mode #2" -variable [scope mode] -value 2
pack .rb2
}
Radiobuttons .rb1 and .rb2 interact via the variable "mode" contained in the namespace "foo". The scope command guarantees this by return-
ing the fully qualified variable name ::foo::mode.
You should never use the @itcl syntax directly. For example, it is a bad idea to write code like this:
set {@itcl ::fred x} 3
puts "value = ${@itcl ::fred x}"
Instead, you should always use the scope command to generate the variable name dynamically. Then, you can pass that name to a widget or to
any other bit of code in your program.
KEYWORDS
code, namespace, variable
itcl scope(n)
few TCL question