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.
Answers were Sorted based on User's Feedback
Answer / devendra singh bhadoriya
2. % set days {monday tuesday wednasday thursday friday
saturday sunday}
monday tuesday wednasday thursday friday saturday sunday
% foreach day $days {
set str [split $day ""]
puts "[lindex $str 0]"
puts "[lindex $str end]"
}
Is This Answer Correct ? | 17 Yes | 6 No |
Answer / basavaraj
1.
a. Initializing using
set x 10
lappend y 13
b. Initializing using out put of an expression
set z [expr $x + $y ]
c . Initializing using a list
set m [list $x $y $z]
Is This Answer Correct ? | 2 Yes | 0 No |
Answer / amirtha
Ans for 3rd Question:
input is filename
if {file exists filename} {
set dir [ file isdirectory filename]
if {$dir == 1} { puts "filename is directory"
} else {
set fil [ file isfile filename]
set size [file size filename ]
puts "filename is file of size
file readable filename ;#to check file is readable by current user
file owned filename ;#to check file is owned by current user
file writable filename ;#to check file is writable by current user
}
Is This Answer Correct ? | 1 Yes | 0 No |
Test case on windows calculator?
write a regular expressions to fetch all the valid ip's
How to Swap 30 & 40 in IP address 192.30.40.1 using TCL script?
if i give in numbers output should be in characters example : set a 23 o/p twentythree
write a program to the given ip is valid private address or not(192.168.1.1)?
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 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,
Problems with utf-8 between Mac and PC
Which scripting language is better among TCL Perl and Python and why?
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 }
how to write the startup scripts in winrunner? can any body explain with example code?
How to run a package in tcl