我有一些值存储在变量$a
,$b
,$c
中。
现在我需要将这些值加载到新文件中(创建文件并加载)。
我是Perl的新手,我该怎么做?
我有一些值存储在变量$a
,$b
,$c
中。
现在我需要将这些值加载到新文件中(创建文件并加载)。
我是Perl的新手,我该怎么做?
#!/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;
}