Perl 如何将数据存储到新文件中

我正在使用xml:：simple处理xml文件，如何将其存储到新文件中

#!/usr/bin/perl
use warnings;
  use strict;
   use Data::Dumper; 
 use XML::Simple;

   my $xml = new XML::Simple;
  my $data = $xml->XMLin("data.xml");
     print Dumper($data);

---

我想将此数据存储到新文件中。

这将覆盖或创建文件：

#!/usr/bin/perl
use warnings;
  use strict;
   use Data::Dumper; 
 use XML::Simple;

   my $xml = new XML::Simple;
  my $data = $xml->XMLin("data.xml");
     print Dumper($data);

open(my $outfile, ">/path/to/some/filename.xml") or die "Could not open file: $!";
print $outfile $xml->XMLOut($data);
close($outfile);

---

请注意，

XML:：Simple

可能会更改文件的结构，因此只有在您正在更改某些内容时，这才有意义。

这将覆盖或创建文件：

open(my $outfile, ">/path/to/some/filename.xml") or die "Could not open file: $!";
print $outfile $xml->XMLOut($data);
close($outfile);

---

请注意，

XML:：Simple

可能会更改文件的结构，因此这只有在您正在更改某些内容时才有意义。

如果您刚刚开始使用XML:：Simple，请阅读其中描述的常见陷阱。尽管如此，XML:：Simple并不是“往返”（先读后写）XML的最佳模块选择。如果您刚刚开始使用XML:：Simple，请阅读其中描述的常见陷阱。话虽如此，XML:：Simple并不是“往返”（先读后写）XML的最佳模块选择。

XMLout（）

方法（注意大写）也接受

OutputFile

选项，因此您可以简单地说：

$XML->XMLout（$data，OutputFile=>“/path/to/some/filename.XML”）

Ok感谢您的回复和使用XMLout（）函数，这样它可以再次将我的数据转换为xml格式，有没有办法将我的XMLin数据（$data）转换为文件或任何其他模块。

XMLout（）

方法（注释大写）也接受

OutputFile

选项，因此您可以简单地说：

$xml->XMLout（$data，OutputFile=>'/path/to/some/filename.xml'）；

Ok感谢您的回复和使用XMLout（）函数再次将我的数据存储为xml格式，是否有任何方法将我的XMLin数据（$data）存储到文件或任何其他模块中。