map

2013-08-23 17:16

my @array = map { sqrt($_)*10 } qw/45 33 8 75 21 15 38 69 46/;