これ、無名関数って呼べるものなのかな？
とりあえず、次のようなコードがあったとして、

#!/usr/bin/perluse strict;use warnings;my @env;foreach ( sort keys %ENV ) {       push @env, "$_=$ENV{$_}";}print join ';', @env;


これはこんな風にも

#!/usr/bin/perluse strict;use warnings;print join ';', map { "$_=$ENV{$_}" } keys %ENV;


こんな風にも書くことができます。

#!/usr/bin/perluse strict;use warnings;print join ';', eval { my $r = ''; $r .= "$_=$ENV{$_}" foreach keys %ENV; return $r; };


ku大先生に感謝です。