Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change

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?

Replies are listed 'Best First'.
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?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1006983]
[marto]: good morning all
[Corion]: Hi marto!
[marto]: Hey Corion, how are things?
[Corion]: Fine! It's amazing how productive I can be with a 3hour daily workload removed :)

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (11)
As of 2018-05-24 07:22 GMT
Find Nodes?
    Voting Booth?