ハッシュキーをPerlで1行に1つずつ印刷しようとしています。どうすればこれを行うことができますか?
これはあなたのためにそれをしますか?
print "$_\n" for keys %hash;
短縮版:
$, = "\n";
print keys %hash;
または、より大きなスクリプト内:
{
local $, = "\n";
print keys %hash;
}
変数に入れて、コメントに従ってメッセージボックスに出力するには:
my $var = join "\n", keys %hash;
これは、map関数を使用して行うことができます。
map {print "$_\n"} keys %hash;
map関数は、ハッシュ内のすべてのキーのステートメントを処理します。