Login or Register to Ask a Question and Join Our Community


Emergency UNIX and Linux Support

TCL scripting - searching for a IP address in a string

Login to Discuss or Reply to this Discussion in Our Community

 
Thread Tools Search this Thread
Homework and Emergencies Emergency UNIX and Linux Support TCL scripting - searching for a IP address in a string
# 1  
Old 10-06-2009
TCL scripting - searching for a IP address in a string
Hi All,

Can anyone please help me with the regular expression/code snippet to search for an IP address in a string with Tcl scripting.

Example string
"OSPF_NBRUP OSPF neighbor 16.138.181.15 (realm ospf-v2 e1-0/0/0:37.0 area 0.0.0.0) state changed from Full to Down due to KillNbr"

In the above string i want to find IP 16.138.181.15



# 2  
Old 10-06-2009
Something like this:

Code:
#!/usr/bin/tclsh 

set string "OSPF_NBRUP OSPF neighbor 16.138.181.15 (realm ospf-v2 e1-0/0/0:37.0 area 0.0.0.0) state changed from Full to Down due to KillNbr"

regexp {(?:\d+\.){3}\d+} $string matched

puts "matched is $matched"

It produces the following output:
Code:
% ./s  
matched is 16.138.181.15

# 3  
Old 11-03-2009
what does the below mean ... I am new in TCL and hope to benefit from this ...


Code:
{(?:\d+\.){3}\d+}



---------- Post updated at 07:26 AM ---------- Previous update was at 07:25 AM ----------

and is "puts" a command or just a word?
# 4  
Old 11-04-2009
Quote:
Originally Posted by ahmad.diab
what does the below mean
[...]
Code:
{(?:\d+\.){3}\d+}




It's a regular expression that matches a sequence of 3 atoms of
one or more digit(s) followed by a literal dot[1] followed by one or more digit(s).

Quote:
[...]
Quote:
and is "puts" a command or just a word?
puts is a command.


[1]

Quote:
(?:.RE-a.) -- This modified version of grouping treats the enclosed regular expression atoms as an entity, but does not return the results in a match variable.
# 5  
Old 11-04-2009
Thanks man
BR

One more thing ..can you please recommend to me some books related to TCL & TK

---------- Post updated at 07:01 AM ---------- Previous update was at 06:58 AM ----------
Quote:
Originally Posted by ahmad.diab
Thanks man
BR
Quote:
One more thing ..can you please recommend to me some books related to TCL & TK

Thanks in advance
# 6  
Old 11-04-2009
Quote:
Originally Posted by ahmad.diab
One more thing ..can you please recommend to me some books related to TCL & TK
I'm quite new to TCL too. I want to learn the language because of expect, which seems very interesting to me.
I purchased Exploring Expect on amazon and there is a quick TCL tutorial at the beginning of the book.
You could even consult it online on Google books.

I should add that the TCL group on USENET (comp.lang.tcl) is also a great resource.
# 7  
Old 11-04-2009
Thanks a lot radoulov Smilie
Login or Register to Ask a Question

Previous Thread | Next Thread

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Difficulty searching for IP address in a file

Hi, Below is the command I use to search for IP address in a file. find ./ -type f \( -name "*.txt" -or -name "*.xml" \) | xargs grep -oE "\b({1,3}\.){3}{1,3}\b"As an output I found three IP address and below is how they look. #Listen 112.34.56.58:80 Listen 112.134.56.58:80 #This is an... (7 Replies)
Discussion started by: mohtashims
7 Replies

2. Shell Programming and Scripting

TCL scripting: errorInfo=integer value too large to represent

The username is of the format : 123456789110000-1234@something.com With this below TCL procedure, I am trying add first and Sec Id and get third Id. I checked in online compiler and it seems to work and add. However, when I am running this in my lab, I get error as "integer value too large to... (3 Replies)
Discussion started by: Shaibal_bp
3 Replies

3. Shell Programming and Scripting

TCL scripting: errorInfo=integer value too large to represent

The username is of the format : 123456789110000-1234@something.com With this below TCL procedure, I am trying add first and Sec Id and get third Id. I checked in online compiler and it seems to work and add. However, when I am running this in my lab, I get error as "integer value too large to... (1 Reply)
Discussion started by: Shaibal_bp
1 Replies

4. Shell Programming and Scripting

Need help with TCL code to find IP address from a URL

Need help with a a tcl code. Need to find out the ip address from a URL if it is present to do some activity. The URLs will be of the form <domain>?a=12345&d=somestring1(Note: c not present) <domain>?c=10.10.10.100&d=somestring1 <domain>?a=12345&b=somestring1&c=10.1.2.4&d=somestring2... (1 Reply)
Discussion started by: ampak
1 Replies

5. Shell Programming and Scripting

TCL expect out string with multiple lines

Hello, I will be sending this command to a specific COMID: exp_send-i $COMID "fdisk -l | grep Disk | awk '{print $2}'" The command will produce this output: /dev/sda /dev/sdb etc.. the problem is how do I store the output in a variable in TCL, I am currently using this to grab the... (1 Reply)
Discussion started by: h0ujun
1 Replies

6. Shell Programming and Scripting

searching the required string and appending string to it.

Hi all, I have some data in the form of adc|nvhs|nahssn|njadnk|nkfds in the above data i need to write a script so thet it will append "|||" to the third occurnace in the string ..... the outout should look like adc|nvhs|nahssn||||njadnk|nkfds Thanks, Firestar. (6 Replies)
Discussion started by: firestar
6 Replies

7. Shell Programming and Scripting

Howto set string variable in TCL?

Anyone knows how to set variable in TCL ? let say i have a password variable and it will have different values. set variable and variable has different values like: xxxx yyyy zzzz (0 Replies)
Discussion started by: linuxgeek
0 Replies

8. Shell Programming and Scripting

getting a string from user while executing a tcl script

Hi All, I am executing a Tcl script and i am trying to get the user input while they execute the script at start itself like >>filename.tcl USERINPUT and then i will take this userinput inside the the tcl assign it to some variable for further manipulation/processing ...... can anyone pls... (1 Reply)
Discussion started by: sukrish
1 Replies

9. Shell Programming and Scripting

String manipulation in TCL

Suppose pwd=/home/user/work/wip1 How to output the "pwd string" into 5 chunks? /home/user/work/wip1 /home/user/work /home/user /home / :confused: (1 Reply)
Discussion started by: jehrome_rando
1 Replies

10. Shell Programming and Scripting

Extracting a string from one file and searching the same string in other files

Hi, Need to extract a string from one file and search the same in other files. Ex: I have file1 of hundred lines with no delimiters not even space. I have 3 more files. I should get 1 to 10 characters say substring from each line of file1 and search that string in rest of the files and get... (1 Reply)
Discussion started by: mohancrr
1 Replies
Login or Register to Ask a Question