my $t = XML::Twig
        ->new( pretty_print => 'indented' )
        ->parse($xml)
        ->print;

##</code><code>##

Output:

<RateInfo>
  <displayCurrencyCode>USD</displayCurrencyCode>
  <DisplayNightlyRates size="3">
    <displayNightlyRate>298.95</displayNightlyRate>
    <displayNightlyRate>298.95</displayNightlyRate>
    <displayNightlyRate>348.95</displayNightlyRate>
  </DisplayNightlyRates>
  <displayRoomRate>1106.62</displayRoomRate>
  <chargeableRoomRateTotal>1106.62</chargeableRoomRateTotal>
  <chargeableRoomRateTaxesAndFees>159.77</chargeableRoomRateTaxesAndFees>
  <nativeCurrencyCode>USD</nativeCurrencyCode>
  <NativeNightlyRates size="3">
    <nativeNightlyRate>298.95</nativeNightlyRate>
    <nativeNightlyRate>298.95</nativeNightlyRate>
    <nativeNightlyRate>348.95</nativeNightlyRate>
  </NativeNightlyRates>
  <nativeRoomRate>1106.62</nativeRoomRate>
  <rateFrequency>B</rateFrequency>
</RateInfo>