perl - perl でファイルを処理するための write 関数

Question

ファイルに書き込まれた出力をフォーマットするために perl の write 関数を使用しようとしていますが、エラーが発生するため実行できません: カンマなしの変数リストの使用は 3 行目で非推奨です。

format STDOUT=
@<<<<<<<<<<<<<<<<<@<<<<<<<<<<<<<<<
  $text            $text1
.
$text="hello";
$text1="world!";
write;

Answer 1

と置き換えるだけです

format STDOUT=
@<<<<<<<<<<<<<<<<<@<<<<<<<<<<<<<<<
  ($text, $text1)
.
$text="hello";
$text1="world!";
write;