write a regular expressions to fetch all the valid ip's
Answers were Sorted based on User's Feedback
set ip "244.168.123.23"
regexp {([0-9]+).([0-9]+).([0-9]+).([0-9]+)} $ip match a b c d
if {$a <=255 & $b <=255 & $c <=255 & $d <=255} {
puts "$ip is valid ip address"
} else {
puts "$ip is not valid address"
}
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / saravanan manoharan
Hi,
check this out
====================
I am trying to match first octet in an valid IP address ,Please copy and paste for the remaining octet
regexp {^([1-9]|[0-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5]).} $ip match first
I have matched in below order ...
1-10
11-99
100-199
200-248
250-255
| Is This Answer Correct ? | 0 Yes | 1 No |
Hi,
check this out
====================
I am trying to match first octet in an valid IP address ,Please copy and paste for the remaining octet
regexp {^([1-9]|[0-9][0-9]|1[0-9][0-9]|2[0-4][0-9]|25[0-5]).} $ip match first
I have matched in below order ...
1-10
11-99
100-199
200-249
250-255
| Is This Answer Correct ? | 0 Yes | 1 No |
Where can find the sample tcl programs?
how to increment eacl element in a list ? eg: incrlist {1 2 3} =>2 3 4
write a program to the given ip is valid private address or not(192.168.1.1)?
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?
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 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,
WHAT IS TCL?
What does Tcl stand for?
{Anu Anudeep Anukumar Amar Amaravathi Aruna} is their any possibility to find the letter "a"in the given list? if yes how?
How to extract "information" from "ccccccccaaabbbbaaaabbinformationabcaaaaaabbbbbbbccbb" in tcl using a single command?
How do you check whether a string is palindrome or not using TCL script?