Re: creating an XML string

Quick & dirty:

sub encode
{
    join '', map { /[\w\d ]/ ? $_ : '&#' . ord() . ';' } split //, shi
+ft;
}
[download]

Comment on Re: creating an XML string Download Code

Replies are listed 'Best First'.
Re^2: creating an XML string by Joost (Canon) on Dec 28, 2004 at 18:10 UTC
Nasty :-) It won't work if the argument to encode() is in LATIN-1, and your XML file is UTF-8. update:... hmmmmmm it appears that the "most reasonable" approach would be simply `sub encode { my $arg = shift; $arg =~ s/&/&/g $arg =~ s/</</g; $arg; }` [download] and do the character encoding seperately using Encode, or let the filehandle figure it out. "What should it profit a man, if he should win a flame war, yet lose his cool?"	[reply] [d/l]
Re^3: creating an XML string by PreferredUserName (Pilgrim) on Dec 30, 2004 at 19:14 UTC
Well, they don't call it "quick and dirty" because it's elegant and complete.	[reply]