Beefy Boxes and Bandwidth Generously Provided by pair Networks Ovid
Your skill will accomplish
what the force of many cannot
 
PerlMonks  

Re^3: Regular expression help

by karlgoethebier (Deacon)
on Mar 12, 2013 at 09:58 UTC ( #1022955=note: print w/ replies, xml ) Need Help??


in reply to Re^2: Regular expression help
in thread Regular expression help

"But I need it in regular expression"

So take this one to continue:

Update: For some unknown reason i skipped a column, sorry:

#!/usr/bin/env perl my $line = 'brown vihl729 172.31.176.71:8532503_6 (v2013.02) (elicserv +1.muc.ifin.com/3120 6260), start Mon 3/11 18:31'; $line =~ m/(\w+)\s ([0-9a-z]+)\s [0-9.:()_]+\s \(.+\)\s \(([a-z0-9.]+).+\) ,\s [\w\s]+ (\d+\/\d+\s\d+:\d+) /x; print qq($1 $2 $3 $4\n); __END__ Karls-Mac-mini:monks karl$ ./missing.pl brown vihl729 elicserv1.muc.ifin.com 3/11 18:31

(If something still makes sense...)

Karl

«The Crux of the Biscuit is the Apostrophe»


Comment on Re^3: Regular expression help
Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1022955]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (13)
As of 2014-04-17 17:02 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (453 votes), past polls