The UNIX and Linux Forums  

Go Back   The UNIX and Linux Forums > Top Forums > Shell Programming and Scripting
.
google unix.com




View Single Post in the UNIX and Linux Forums - Click on the Thread or Permalink to View Entire Thread -->
  #2 (permalink)  
Old 01-04-2009
radoulov's Avatar
radoulov radoulov is offline Forum Staff  
addict
  
 

Join Date: Jan 2007
Location: Варна, България / Milano, Italia
Posts: 2,926

Code:
perl -00ne'
  print  join " ",
        /HOST=([^)]+)\)
        \(PORT=(\d+).*?
          SID=(\w+)/x, "\n" 
  ' logfile

If the records are not separated by blank lines, remove the 00 option and argument.

Last edited by radoulov; 01-04-2009 at 01:30 PM..