如何在Perl中创建一个新文件？

Question

我有一些值存储在变量$a，$b，$c中。 现在我需要将这些值加载到新文件中（创建文件并加载）。 我是Perl的新手，我该怎么做？

- Jackie James

---

你是否尝试过自行寻找解决方案？在Google搜索“如何使用Perl编写文件”可以得到3540万个结果。 - Martin

打开文件，">"，"filename.txt"或者如果出错就退出 $! - Jackie James

有人能告诉我吗？ - Jackie James

关于您问题的标题，请写成"perl"或"Perl"，但永远不要写成"PERL"。 - pilcrow

在Perl中，$a和$b不是好的变量名称，因为它们可能会与sort()内置的$a和$b变量发生冲突或混淆。 - plusplus

Answer 1

#!/usr/bin/env perl
use strict;
use warnings FATAL => 'all';
use autodie qw(:all);

my $a = 5;
my $b = 3;
my $c = 10;

#### WRITE ####
{
    open my $fh, '>', 'output.txt';
    print {$fh} $a . "\n";
    print {$fh} $b . "\n";
    print {$fh} $c . "\n";
    close $fh;
}

#### READ ####
{
    open my $fh, '<', 'output.txt';
    my ($a, $b, $c) = <$fh>;
    print $a;
    print $b;
    print $c;
    close $fh;
}

你应该阅读perlopentut和初学Perl Maven教程：文件写入。

- Jagtesh Chadha

---

@ Jagtesh Chadha 和 Daxim：谢谢你们。 - Jackie James

@JackieJames：如果您能选择正确的答案并关闭此问题，我将不胜感激。 - Jagtesh Chadha

Answer 2

另一个选择：File::Slurp 提供了方便的 read_file 和 write_file 函数。

write_file('/path/file', @data);

- plusplus

Answer 3

请查看YAML模块的LoadFile和DumpFile方法。它们非常容易使用，只需要将文件名和实际数据传递给它们即可。

如果对此有疑问，请提出具体问题。

- Daniel Böhmer