use warnings; use strict; use XML::Twig; my $xml = < 2222 processed 1234 54321 449.0 90.0 0 HD ORDER IS ON HOLD UNTIL 11/01/13 XML my $twig = XML::Twig->new( pretty_print => 'indented', empty_tags => 'expand', ); $twig->parse($xml); $twig->print; __END__ Output: 2222 processed 1234 54321 449.0 90.0 0 HD ORDER IS ON HOLD UNTIL 11/01/13