Как создать новый файл в Perl?

У меня есть некоторые значения, хранящиеся в переменных $a,$b,$c, Теперь я должен загрузить эти значения в новый файл (создать файл и загрузить). Я новичок в Perl, как я могу это сделать?

3 ответа

Решение
#!/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 для начинающих: Запись в файлы.

Еще одна опция: File:: Slurp предоставляет удобный read_file а также write_file функции

Посмотрите на методы LoadFile а также DumpFile из YAML модуль. Они очень просты в использовании, так как вам просто нужно добавить к ним имя файла и фактические данные.

Задайте конкретные вопросы, если не ладите с ними.

Другие вопросы по тегам