Interested to Buy Any Domain ? << Click Here >> for more details...
how to increment eacl element in a list ?
eg: incrlist {1 2 3}
=>2 3 4
- 9 Answers
- 21174 Views
- Honeywell, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / yatanti
set incrlist { 1 2 3 }
foreach element $incrlist {
set new_element [ expr $element + 1 ]
lappend new_incrlist $new_element
}
puts $new_incrlist
| Is This Answer Correct ? | 18 Yes | 3 No |
Answer / gagik sukiasyan
set list {1 2 3}
regsub -all {(\d+)} $list "\[expr \\1 + 1\]" new_list
set result [eval concat "" $new_list]
| Is This Answer Correct ? | 9 Yes | 2 No |
Answer / rangasa
set listItems {15 2 35}
for {set i 0} {$i < [llength $listItems]} {incr i} {
set newVal [expr [lindex $listItems $i] + 1]
set listItems [lreplace $listItems $i $i $newVal]
}
puts "The newly framed list is $listItems"
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / thirumurugan
set list1 {1 2 3}
foreach ele $list {
incr ele
lappend list2 $ele
}
puts $list2
| Is This Answer Correct ? | 4 Yes | 2 No |
Answer / ritu gupta
set l {1 2 3}
set i 0
foreach e $l {
lset l $i [ expr $e + 1]
incr i
}
| Is This Answer Correct ? | 2 Yes | 1 No |
Answer / ch.venkatesh
set list {1 2 3}
for {set i 0} {$i < [llength $list]} {incr i} {
set x [lindex $list $i]
set y [expr $x+1]
puts "$y"
}
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / mayank
// it works like incrlist 5 6 7 =>> 6 7 8
proc incrlist args {
set s 0
foreach s $args {
incr s 1
puts $s
}
}
//for list
proc incrlist list {
set s 0
foreach s $list {
incr s 1
puts $s
}
}
| Is This Answer Correct ? | 5 Yes | 5 No |
Answer / jiandoer
set lstr [list 10 20 30]
unset rlstr
foreach item $lstr {
if {[info exists rlstr]} {
lappend rlstr [incr item]
} else {
set rlstr [incr item]
}
}
puts "input list: $lstr"
puts "result list: $rlstr"
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / meganathan
set a {10 11 12}
set b 0
foreach c $a {
set c [expr $c+1]
lset a $b $c
incr b
}
puts $a
| Is This Answer Correct ? | 0 Yes | 0 No |
Test case on windows calculator?
Problems with utf-8 between Mac and PC
how to write the startup scripts in winrunner? can any body explain with example code?
What does Tcl stand for?
How do you find the length of a string without using string length command in TCL??
how to remote log in to a system A to system B ,execute commands in it and collect the log in system A from B using TCL script??
1 Answers Global Edge, Sandvine,
how to increment eacl element in a list ? eg: incrlist {1 2 3} =>2 3 4
Set ip address as 10.30.20.1 write a script to replace the 30 with 40 ?
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
if i give in numbers output should be in characters example : set a 23 o/p twentythree
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 }
Which scripting language is better among TCL Perl and Python and why?
ASP 
