Multi-lingual Websites (with XML) - The Code (Whitespace Supression)

  use Data::Phrasebook;

  my $q = Data::Phrasebook->new();
  $q->load(
              loader => 'XML',
              file   => {
                          file => 'phrases.xml',
                          suppress_whitespace => 1,
              },
              dict   => 'Welsh'
  );

  # $value =~ s/^\s+//;   # trim leading spaces
  # $value =~ s/\s+$//;   # trim trailing spaces
  # $value =~ s/\s+/ /gs; # collapse multiple spaces

• Also ignore_newlines