map

map{ 配列の変換処理 } 変換対象の配列

#!/usr/bin/perl

@ary_num = ( 1 , 2 , 3 , 4 , 5 );
@ary_str = ( "1" , '2', '3' , '4' , '5');

@ary_num_add = map { $_ * 10 } @ary_num;
@ary_str_add = map { $_ . '0' } @ary_str;

print "Content-type:text/html\n\n";

print "@ary_num_add<br>";
print "@ary_str_add<br>";


●出力結果
10 20 30 40 50
10 20 30 40 50

配列要素を変換できます。
例に記載していませんが、配列の空白削除や改行削除などに使用するのに便利です。