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

Re^3: Perl Extract specific string

by CountZero (Bishop)
on Feb 09, 2013 at 16:54 UTC ( [id://1017975]=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    use Modern::Perl;
    
    while (<DATA>) {
    ...
    
    __DATA__
    06.02.2013 12.24.01:909 5807225321 INFO {EXT:httpadapter:17:14:}[0]RUL
    +EZ [HTTPADAPTER],msisdn:637584930382,ud:Pan,trxtime:20130206122401 Re
    +sponseDeltaTime:31 ms ResponseCode:200 ResponseBody:OK
    
  2. or download this
    06.02.2013,637584930382,Pan,20130206,200
    

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others studying the Monastery: (6)
As of 2024-03-29 14:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found