Interested to Buy Any Domain ? << Click Here >> for more details...
if i give in numbers output should be in characters
example : set a 23
o/p twentythree
- 1 Answers
- 2767 Views
- Alcatel, I also Faced
- E-Mail Answers
Answer / thiru
set oned { one two three four five six seven eight nine ten }
set towd { ten eleven twelve thirteen fourteen fifteen sixteen seventeen eighteen nineteen }
set multten {ten twenty thirty forty fifty sixty seventy eighty ninety}
set num 67
set len [string len $num]
if {$len == 1} {
set first [regexp -inline {[0-9]} $num]
set first [lindex $oned $first-1]
puts $first
}
if {$len == 2 && $num < 19} {
set first [regexp -inline {[0-9]$} $num]
set first [lindex $towd $first]
puts $first
}
if {$len == 2 && $num > 19} {
set first [regexp -inline {[0-9]} $num]
set first [lindex $multten $first-1]
set second [regexp -inline {[0-9]$} $num]
set second [lindex $oned $second-1]
puts "$first $second"
}
| Is This Answer Correct ? | 1 Yes | 0 No |
Hi all, Is there any certification exams available for TCL and Perl. If so please let me know, my mailid is vpbharathi@gmail.com. Thanks in advance, Bharathi.P
How to run a package in tcl
1.What are the different ways to initialize a variable. How to differentiate global and local variables, explain it through a simple tcl program. 2.Create a list of week days and print the first and last character of each day using foreach command 3.Can you write a small program to verify the given input is file or directory.Before checking, just ensure that the file/dir exists or not in the given path. If the given input is a file, findout the size and verify that the file has all read ,write and execute permission.
How do you check whether a string is palindrome or not using TCL script?
how to write the startup scripts in winrunner? can any body explain with example code?
How to get the next ip for given ip ex: 10.10.10.1 -> 10.10.10.2 ex: 10.10.10.255 -> 10.10.11.0
How increment a character? For example, I give 'a' and I should get 'b'.
How to Swap 30 & 40 in IP address 192.30.40.1 using TCL script?
how to write a startup script in winrunner
Write a program to increment IP address to +10 and verify it is correct ip or not ?? example my ip is 172.122.132.143 increment this ip to +10 and verify it is valid ip or not
Set ip address as 10.30.20.1 write a script to replace the 30 with 40 ?
How to extract "information" from "ccccccccaaabbbbaaaabbinformationabcaaaaaabbbbbbbccbb" in tcl using a single command?
ASP 
