Re: How can I add missing XML open tags

in reply to How can I add missing XML open tags

Personally, I'd just do this: s{<([^/>]+?)/>}{<$1></$1>}g. Only if this didn't work for some peculiar reason would I bother with a more complicated solution.

Jim

UPDATE: A possibly better alternative: s{<(\w+)/>}{<$1></$1>}ag. (Notice the /a character set modifier, which is purposeful.)

Comment on Re: How can I add missing XML open tags Select or Download Code

Replies are listed 'Best First'.
Re^2: How can I add missing XML open tags by TheVend (Novice) on Dec 04, 2013 at 21:30 UTC
That was surprisingly very effective. Thanks!	[reply]
Re^3: How can I add missing XML open tags by Jim (Curate) on Dec 04, 2013 at 21:42 UTC
You're welcome. But you really shouldn't find it "surprisingly very effective." Perl excels at text transformation. XML is text. Changing all occurrences of `<foo/>` to `<foo></foo>` in an XML document is a trivial transformation (unless it isn't due to some rare and unlikely edge case). Jim	[reply] [d/l] [select]

In Section Seekers of Perl Wisdom