Perl格式未终止

Question

我在这段代码编译期间收到格式未终止错误.

    while(@studentNames) {
            my $name = pop(@studentNames);
            my $age = pop(@studentAges);
            my $GPA = pop(@studentGPAs);

            format STDOUT =
            @<<<<<<<<<<<<<<<<<<<<<<<<<<< @<< @<<<
            "test", "42", "0.0"

            .

            write;
    }

我正在尝试编写一个类似下面的表到STDOUT,然后最终输出文件.

    name1            age1 GPA1
    name2            age2 GPA2
    ...

提前致谢

Answer 1

点必须放在第一列中.

    format STDOUT =
@<<<<<<<<<<<<<<<<<<<<<<<<<<< @<< @<<<
"test", "42", "0.0"

.