if i give in numbers output should be in characters
example : set a 23
o/p twentythree
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 |
Which scripting language is better among TCL Perl and Python and why?
WHAT IS TCL?
Write a proc to increment the ip by the given no. of times. The incremented IPs should be a valid one. Ex: proc <name> {ip no_of_incrments} { body }
if i give in numbers output should be in characters example : set a 23 o/p twentythree
{Anu Anudeep Anukumar Amar Amaravathi Aruna} is their any possibility to find the letter "a"in the given list? if yes how?
How TCL works
How to run a package in tcl
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 to write a startup script in winrunner
Test case on windows calculator?
How increment a character? For example, I give 'a' and I should get 'b'.
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