perl语言怎么用macOS做：写一个程序， 将一些字符串（不同的行） 读入一个列表中， 然后，再以相反顺序输出这个列表。 如果是从键盘输入的， 那在 Unix 系统中应当使用 CTRL+D 或者在 Windows 系统中使用 CTRL+Z来表示输结束。

在Mac OS上使用Perl编写这样的程序非常简单。你可以使用`<>`操作符来从标准输入读取字符串，并将它们存储到数组中，然后通过`reverse`函数反转数组的顺序。下面是一个简单的示例：

#!/usr/bin/perl
# 对于Unix系统（包括Mac），添加这一行是为了指定默认的perl解释器

use strict;
use warnings;

my @strings; # 创建一个空数组来储存字符串

# 使用while循环从用户输入读取直到遇到EOF（如CTRL+D）
while (<STDIN>) {
    chomp; # 移除每行末尾的换行符
    push @strings, $_; # 把字符串追加到数组中
}

print "Input strings in reverse order:\n";
# 使用reverse函数反转数组并打印
foreach my $str (@strings) {
    print "$str\n";
}

__END__
# 这里可以添加更多的命令或处理，但在上述循环结束后，程序会等待新的输入或EOF

运行此程序后，在终端输入字符串，然后按下`CTRL + D`（Unix/Linux系统）或`CTRL + Z`（Windows系统）来结束输入。程序将会按相反的顺序显示你提供的所有字符串。