Extract only nos from multiple lines 1

[spookie]

Hi All,
I have a file of following format.

2008/09/02 00:30:10 INFO> Feature.pm:181 - Processing Response for 01234 Feature FEAT_10 status A msg 
2008/09/02 00:30:10 DEBUG> Feature.pm:182 - Feat Seq 582269
2008/09/02 00:30:11 INFO> Feature.pm:191 -  Response FEAT_ERR_005
--
2008/09/02 00:30:11 INFO> Feature.pm:181 - Processing Response for 45678 Feature FEAT_02 status A msg 
2008/09/02 00:30:11 DEBUG> Feature.pm:182 - Feat Seq 584908
2008/09/02 00:30:11 INFO> Feature.pm:191 -  Response FEAT_ERR_005
...
...

I want to extract the output as
01234,582269
45678,584908
...
I can do it in PERL, reading file line by line and searching for a digit..(\b\d+\b). But i am curious how it can be achieved in AWK..preferably one liner

Thanks in advance.



--------------------------------------------------------------------------
I never set a goal because u never know whats going to happen tommorow.

 

[feherke]

Hi

awk '/Response for/{printf"%s,",$9}/Feat Seq/{print$NF}' /input/file

Feherke.

http://rootshell.be/~feherke/

 

[spookie]

Perfect,Thanks..

--------------------------------------------------------------------------
I never set a goal because u never know whats going to happen tommorow.