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