簡體   English   中英

如何在Perl中創建一個新文件?

[英]How to create a new file in 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;
}

您應該閱讀perlopentutPerl Maven初學者教程:寫入文件

看看YAML模塊的LoadFileDumpFile方法。 它們非常易於使用,因為您只需要向它們拋出文件名和實際數據即可。

提出具體問題,如果不能與他們相處。

另一個選擇: File :: read_file提供便捷的read_filewrite_file函數

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM