1

ファイルの最初の行から文字列を読み取り、コンソールでn回繰り返します。ここで、 nはファイルの 2 行目に指定されています。

シンプルだと思いますか?

#!/usr/bin/perl
open(INPUT, "input.txt");
chomp($text = <INPUT>);
chomp($repetitions = <INPUT>);
print $text x $repetitions;

場所input.txtは以下の通り

Hello
3

私は出力が

HelloHelloHello

しかし、それが使用されているにもかかわらず、単語は改行で区切られてchompいます。

Hello
Hello
Hello

次の Perl fiddle CompileOnlineで試すことができます

奇妙なことは、コードが次のようになっている場合です。

#!/usr/bin/perl
open(INPUT, "input.txt");
chomp($text = <INPUT>);
print $text x 3;

正常に動作し、表示されます

HelloHelloHello

何か誤解しているのでしょうか、それともオンライン コンパイラの問題でしょうか?

4

1 に答える 1