Есть ли команда XMLout типа для XML :: Smart?

Question

У меня есть файл XML, что я открывала с XML :: Simple, теперь я хочу сделать это с XML :: Смарт

так есть способ, в котором я могу напечатать это в XML :: Смарт

print XMLout(\%clean_xml, NoAttr => 1, RootName => $root_key, XMLDecl => 1); 

Благодаря

Answer 1

из стручка: CREATING-XML-DATA

## Create a null XML object: 
my $XML = XML::Smart->new() ; 

## Add a server to the list: 
$XML->{server} = { 
os => 'Linux' , 
type => 'mandrake' , 
version => 8.9 , 
address => '192.168.3.201' , 
} ; 

## The data now: 
## <server address="192.168.3.201" os="Linux" type="mandrake" version="8.9"/> 

## Or save it directly: 
$XML->save('newfile.xml') ;