}
if ( $as_xml ) {
warn "Warning: You passed -x which is already the default and is now deprecated·\n";
warn "Warning: You passed -x which is already the default and is now deprecated\n";
undef $as_xml; # Should not be used later
-