Example

Drago · Post by **Drago** » Sat May 07, 2005 1:59 pm

Hay i whant to learn tcl scripting and i'm reading the suninet faq but i don't understand one thing http://www.suninet.nl/tclguide/index.php?chap=7&pg=1 plz give me some example for this...

Post by **Sir_Fz** » Sat May 07, 2005 2:34 pm

suppose this

Code: Select all

set suppose "bla"

if you want to check if suppose matches bla then use this

Code: Select all

if {$suppose == "bla"} { <body> }

if you want to check if it doesn't match then use

Code: Select all

if {$suppose != "bla"} { <body> }

ofcourse, this is case sensitive. For example if $suppose is Bla it will not match bla. so you can use

Code: Select all

if {[string equal -nocase "bla" $suppose]} { <body> }

or add '!' if you want to check if it doesn't match.

using the first method, you can also check if a value is greater, less or equal.. like suppose

Code: Select all

set value 10

you can do checks like

Code: Select all

if {$value > 8} { <body> }

this is true since 10 is greater than 8
you can also use >= which means greater or equal.. from here you can get the concept.

Edit: Fixed typo, thanx ^DooM^

^DooM^ · Post by **^DooM^** » Sat May 07, 2005 5:14 pm

Oops typo Alert..!!

Sir_Fz wrote:
Code: Select all
of {$value > 8} { <body> }

should be

Code: Select all

if {$value > 8} { <body> }

There is no operater called 'of' just to make things a little clearer. Usually I would not of said anything but as you are learning I thought it best to mention it

Cheers