Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Re: Problem while Data Extraction

by Anonymous Monk
on Dec 04, 2012 at 03:24 UTC ( #1006983=note: print w/ replies, xml ) Need Help??


in reply to Problem while Data Extraction

The data between "|" need to be saved as it is without the spaces and data outside pipes need to be converted to ASCII.

Can you explain this better, like give an example?


Comment on Re: Problem while Data Extraction
Re^2: Problem while Data Extraction
by jpvinny28 (Initiate) on Dec 04, 2012 at 03:30 UTC

    Input =|14 0D 2A|abc

    Output =140D2A616263

    The values within two pipes is hexadecimal data.. so I need to keep the values as it is in output and value outside the pipe I need to convert to ascii equivalent (abc=61,62,63) in the above example

      my @F = split(/\|/, $_, 0); foreach $_ (@F) { if (/^[\da-z]{2}(?:\s[\da-z]{2})*$/i) { s/\s+//g; print $_; } else { print unpack('H*', $_), $/; } }

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (7)
As of 2014-12-28 06:10 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (178 votes), past polls