如何在Perl中创建新文件？

Question

我有一些值存储在变量$a中$b,$c.现在我要将这些值加载到新文件中(创建文件和加载).我是Perl的新手,我该怎么办？

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和Beginner Perl Maven教程:写入文件.