как сохранить данные в новый файл

Question

Я обрабатываю XML-файл, используя XML :: simple, и как я могу сохранить его в новом файле.

#!/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);

Я хочу сохранить эти данные в новом файле.

Answer 1

Это перезапишет или создаст файл:

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

Обратите внимание, что XML::Simple, вероятно, изменит структуру вашего файла, так что это действительно имеет смысл, только если вы что-то меняете.