#15:繰り返し回数を受け取る
ここでは、ループ処理で、複数のデータを受け取る方法を学習します。ループ処理のなかで STDIN を使うと、標準入力から複数のデータを受け取ることができます。
my $greeting = "Hello world";
my $count = <STDIN>;
for (1 .. $count) {
print $greeting . "\n";
}
my $count = <STDIN>;
for (1 .. $count) {
my $name = <STDIN>;
chomp($name);
print "Hello ${name}\n";
}