Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re: Help with pattern matching quantifiers

by toolic (Bishop)
on Oct 24, 2016 at 17:55 UTC ( #1174612=note: print w/replies, xml ) Need Help??


in reply to Help with pattern matching quantifiers

Since your lines are fixed-width, you can use unpack:
use warnings; use strict; while (<DATA>) { chomp; my $template = 'A3' x 20; my @nums = unpack $template, $_; } __DATA__ -8-18 -9-10 -8 -7 -9-10 -9 -6 -5 -8 12 -7-10 -8 -8 -8 -8 -6 -3 2 2 -2 -8 1 -2 -5 -1 -4 -6 6 -4 -6 -5 -1 0 -8 -6 -6 3 -6 -3 -6 -2 -5 -5 -5 -4 4 -3 -2 -2 -3 -5 1 3 -7 -4 3 1 -6 -5 -6 4 -5 -6 -5 -6 3 1 -5 -3 -2 -5 -1 3 -4 -3 4 2 -8 -6 -7 -8 -8 -8 7 -8 -9 -9 -7 -8 -6 -8 -4 -7 -9 -9 -8

I added a single space to the beginning of every line so that each number would occupy 3 columns. If that is not the case with your actual input, the template just needs to be adjusted.

Replies are listed 'Best First'.
Re^2: Help with pattern matching quantifiers
by Anonymous Monk on Oct 24, 2016 at 17:58 UTC
    Oh wow, I did not know this command!!
    Thank you very much!

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (4)
As of 2022-01-24 19:45 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    In 2022, my preferred method to securely store passwords is:












    Results (65 votes). Check out past polls.

    Notices?