如何在Perl中创建新文件?

时间:2012-06-14 10:38:33

标签: perl serialization perl-io

我在变量$a$b$c中存储了一些值。 现在我要将这些值加载到新文件中(创建文件和加载)。 我是Perl的新手,我怎么能这样做?

3 个答案:

答案 0 :(得分:14)

#!/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;
}

您应该阅读perlopentutBeginner Perl Maven tutorial: Writing to files

答案 1 :(得分:0)

查看YAML模块的方法LoadFileDumpFile。它们非常易于使用,因为您只需要输入文件名和实际数据。

如果不与这些人相处,请询问具体问题。

答案 2 :(得分:0)

另一个选项:File::Slurp提供了方便的read_filewrite_file功能