Re: Array Filter and Lookahead

If you really want the last integer in a string, you can find that as /.*(?<!\d)(\d+)/, and get the numbers as

my @filtered = map { /.*(?<!\d)(\d+)/; $1 // '' } @lines;
[download]

However you seem to want to turn 3.0 into 3 (and not 0), and I don't know the rules behind that. Do you want to permit decimals, and cut off zero-decimals behind the dot? Or something else?

Perl 6 - the future is here, just unevenly distributed

Comment on Re: Array Filter and Lookahead Select or Download Code

Replies are listed 'Best First'.
Re^2: Array Filter and Lookahead by AnomalousMonk (Archbishop) on Nov 20, 2012 at 20:00 UTC
`>perl -wMstrict -le "my @lines = ('xx', '0 xx', '1 xx 3.2'); ;; 'Zonk' =~ m{ (\w+) }xms; ;; my @filtered = map { /.*(?<!\d)(\d+)/; $1 // '' } @lines; printf qq{'$_' } for @filtered; " 'Zonk' '0' '2'` [download]	[reply] [d/l]
Re^3: Array Filter and Lookahead by moritz (Cardinal) on Nov 21, 2012 at 06:38 UTC
Right, I forget about Perl 5's insane behavior about capture variables when a match failed. The correct way would be to use `/.../ and $1 // ''` or some variation thereof. Perl 6 - the future is here, just unevenly distributed	[reply] [d/l]
Re^2: Array Filter and Lookahead by daugh016 (Initiate) on Nov 20, 2012 at 21:00 UTC
Thanks for the feedback! The numbers are actually section numbers so sometimes they are written "section 1" and sometimes it could be "section 1.", "section 1)", "section 1.)", etc.	[reply]
Re^3: Array Filter and Lookahead by AnomalousMonk (Archbishop) on Nov 20, 2012 at 21:27 UTC
So what's the extraction rule? One can make a guess based on the examples just given, but an explicit definition is always nice to have.	[reply]