Re: cool way of manipulating array elements


Don't ask to ask, just ask
	PerlMonks

Re: cool way of manipulating array elements

by BioLion (Curate)

on Aug 30, 2011 at 08:02 UTC ( [id://923139]=note: print w/replies, xml )

Need Help??

in reply to cool way of manipulating array elements

Maybe map? and a util function to test for whether each element is a number - Scalar::Util?

use strict; use warnings;
# or some other util function that can tell if it is a number...
use Scalar::Util qw(looks_like_number); 

my @array = ('1','2','45','65','what is this?');
my @mod = map {if (looks_like_number($_)){$_*2} else {$_}} @array;
print "$_\n" for @mod;
[download]

Hope this helps... (I am a bit Rusty, so be gentle...)

Just a something something...

Comment on Re: cool way of manipulating array elements Download Code

Replies are listed 'Best First'.
Re^2: cool way of manipulating array elements by pashanoid (Scribe) on Aug 30, 2011 at 08:18 UTC
thank you! works great!	[reply]
Re^3: cool way of manipulating array elements by GrandFather (Saint) on Aug 30, 2011 at 10:06 UTC
If you want to modify the original array contents then you could modify BioLion's code thus: `$_ *= 2 for grep {looks_like_number($_)} @array;` [download] True laziness is hard work	[reply] [d/l]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://923139]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others examining the Monastery: (4)

As of 2024-04-19 23:48 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found