Help Neded.

[johnny12354]

Hello Guys, I have no perl experience whatsoever, but am trying to do the following. I have to do the following :

I have a .txt file full of things like

blah logged out from [ xxx.xxx.xxx.xxx ]
blah logged in from [ xxx.xxx.xxx.xxx ]

i need to make a script that will retrieve the contents of the [ xxx.xxx.xxx.xxx ]

and store them into a .txt file is this possible in perl?

Any help would be greatly appreciated.

 

[feherke]

Hi

perl -pe 's/.*\[ *([[:digit:].]+) *\].*/$1/' /input/file > /output/file

Feherke.

http://rootshell.be/~feherke/

 

[feherke]

Hi

If your command interpreter does not accept single quotes ( ' ) as parameter delimiter, better put the code in a file :

s/.*\[ *([[:digit:].]+) *\].*/$1/

and run it as

perl -p johnny12354.pl /input/file > /output/file

Feherke.

http://rootshell.be/~feherke/

 

[KevinADC]

or try double-quotes:

perl -pe "s/.*\[ *([\d.]+) *\].*/$1/" /input/file > /output/file

------------------------------------------
- Kevin, perl coder unexceptional!