können Sie die Ausgabe von Flush in Perl erzwingen

Ich habe die folgenden zwei Zeilen in Perl:

print "Warning: this will overwrite existing files.  Continue? [y/N]: \n";
my $input = <STDIN>;

Das Problem ist, dass die Druckzeile nicht ausgeführt wird, bevor das Perl-Skript für die Eingabe angehalten wird. Das heißt, das Perl-Skript scheint ohne ersichtlichen Grund auf unbestimmte Zeit anzuhalten. Ich vermute, dass die Ausgabe irgendwie gepuffert ist (weshalb ich das \ n eingefügt habe, aber das scheint nicht zu helfen). Ich bin ziemlich neu in Perl, daher würde ich mich über Ratschläge freuen, wie Sie dieses Problem umgehen können.

Antworten auf die Frage(6)

Ihre Antwort auf die Frage