07/10/09 05:31:19
@array = qw[0 1 3 5 1 3 2 0 9];
%tmp = map { $_ => "moe" } @array;
@uniq = keys %tmp;
作業用の変数を使いたくなければ、
@uniq = keys %{ { map { $_ => "moe" } @array } };
と書くこともできます。
制限: undef以外のスカラ値のみしか扱えません。
07/10/09 05:31:19
@array = qw[0 1 3 5 1 3 2 0 9];
%tmp = map { $_ => "moe" } @array;
@uniq = keys %tmp;
作業用の変数を使いたくなければ、
@uniq = keys %{ { map { $_ => "moe" } @array } };
と書くこともできます。
制限: undef以外のスカラ値のみしか扱えません。