Как напечатать две переменные информации в одном файле

Question

Я новичок в Perl. Я извлекаю информацию о некоторых узлах из XML-файла, и мне нужно распечатать эту информацию в постоянном файле.

open( my $file, '>', "data" )

while ( $reader->nextElement( 'info' )) {
      my $information= $reader->readOuterXml();

      $reader->nextElement( 'address' );
      my $address = $reader->readOuterXml();

      print $file "$information\n";

}

Как распечатать $address информацию на том же $file. Пожалуйста, помогите мне с этим.

Answer 1

Добавьте эту строку после вашего print заявления:

print $file "$address\n";

Answer 2

print $file "$information\n";
print $file "$address\n";