当脚本仍在运行时，如何使用 vim 从 Perl 编辑文本？

Question

我有一个输出文本的 Perl 脚本。 我想将这段文本导入vim，编辑它，保存它，然后退出。 退出时，我希望原始 Perl 脚本处理编辑后的文件。

例如，当您添加新作业时，crontab -e 是如何工作的。

谢谢 ：）

Answer 1

听起来像是使用 system 在文件名上运行 vim 的非常简单的情况。 这将等到 vim 完成，此时您可以继续读取文件的新内容。

Answer 2

use File::Temp;
my $fh = new File::Temp();
my $fname = $fh->filename;
print $fh "My Text";
$fh->close();
system($ENV{EDITOR}, $fname);
open $fh, '<', $fname or die "Can't open temp file: $!";
while(<$fh>) { print }
close $fh;

Answer 3

建议：为什么不获取 crontab 的源代码并看看它做了什么？

除此之外，放松有你的答案。

我认为思考这个问题的方法是：

“好吧，我需要一个程序来写出一个文件，调用 vim，然后对文件进行进一步处理。所以，这是我编写文件的例程，这是我调用的例程vim（使用系统），这是我在 vim 完成后进行后处理的例程，现在我将它们全部放在我的主程序中，我就完成了！”

Answer 4

您似乎想将脚本的输出通过管道传输到 vim 中：

script | vim

然后您希望脚本以某种方式知道 Vim 已完成并恢复。 I/O 重定向不是这样工作的。 该脚本不知道其输出正在通过管道传输到哪个程序。

您提到了其他程序，例如 crontab 和 cvs； 它们的一个共同点是它们自己调用编辑器。 他们创建临时文件，读取 EDITOR 或 VISUAL 环境变量（有关如何选择哪一个的详细信息，请查看手册），运行给定的程序，然后等待程序完成。 然后他们继续运行并使用他们之前指定的文件。

事实证明我已经在 Perl 中做到了这一点。 我创建了一个临时文件（使用 tempfile），在其中写入一堆文本，然后使用 < code>system 调用文件编辑器。 您甚至不必在运行编辑器时关闭文件。

Answer 5

将输出通过管道传输到 vim - 并且不要忘记末尾的破折号。

script.pl | vim -

这将打开 vim，并显示脚本输出的内容。 只需保存:w 文件名 并退出:q。 这不是 crontab -e 的工作方式，但它以一种简单的方式足够接近。

编辑：
我错过了这一部分（或者问题可能是后来被编辑的）：

退出时，我想要原始的 Perl
处理已编辑文件的脚本。

这不是最好的方法，但按照我原来的答案，这是可行的（如果您将文件另存为 file.txt）：

perl -le 'print "1234"' | vim - && perl -pe '' file.txt

只需将 perl 命令替换为您的 perl 命令，它就应该可以工作。 就像我说的，这不是最好的答案，但它应该有效。