how can i avoid double quotes in options of start tag

phoenix007 has asked for the wisdom of the Perl Monks concerning the following question:

How can I avoid double quotes from output of following script. Tried different options to disable this double quotes feature. Every time if there is option in start tag this script is putting it in double quotes


use HTML::TreeBuilder;

my $row_html = '<!DOCTYPE html>
<body>
<p class=3D"MsoNormal">https://www.google.com<o:p></o:p></p>
</body>';

my $html = HTML::TreeBuilder->new;
$html->ignore_ignorable_whitespace(0);
$html->no_space_compacting(1);
$html->store_comments(1);
$html->parse($row_html);
# i will do some modifications to HTML here
my $output_html = $html->as_HTML(undef,undef,{});
print $output_html;
[download]

Current Output Note the double quotes around value of class="":

<!DOCTYPE html>
<html><head></head><body>
<p class="3D"MsoNormal"">https://www.google.com<o:p></o:p></p>
</body>
</html>
[download]

I am expecting it without double quotes

<!DOCTYPE html>
<body>
<p class=3D"MsoNormal">https://www.google.com<o:p></o:p></p>
</body>
[download]

Comment on how can i avoid double quotes in options of start tag Select or Download Code

Replies are listed 'Best First'.
Re: how can i avoid double quotes in options of start tag by Corion (Patriarch) on Apr 23, 2019 at 11:12 UTC
`<p class=3D"MsoNormal">https://www.google.com</p>` [download] Your HTML is encoded as "quoted-printable". The appropriate steps are to first decode the HTML from Quoted-Printable, for example using MIME::QuotedPrint. Then, munge the HTML as appropriate. Afterwards, optionally re-encode the HTML as quoted-printable if your mail client does not do that already.	[reply] [d/l]
Re: how can i avoid double quotes in options of start tag by LanX (Saint) on Apr 23, 2019 at 10:48 UTC
I took a glimpse into the source of HTML::TreeBuilder and it seems to be hardcoded: `$val = qq{"$val"};` IMHO better try escaping the doublequotes `"3D\"MsoNormal\""` Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery FootballPerl is like chess, only without the dice}	[reply] [d/l] [select]
Re: how can i avoid double quotes in options of start tag by marto (Cardinal) on Apr 23, 2019 at 10:48 UTC
Curious, what is invalidating this HTML? 3DMsoNormal (not 3D"MsoNormal") is a class generated by Microsoft Office products.	[reply]
Re^2: how can i avoid double quotes in options of start tag by phoenix007 (Sexton) on Apr 23, 2019 at 10:54 UTC
Yes, As a sample I have posted one line from large html generated by microsoft product	[reply]
Re^3: how can i avoid double quotes in options of start tag by marto (Cardinal) on Apr 23, 2019 at 11:04 UTC
But they produce a valid class name `<p class=MsoNormal> derp !</p>`.	[reply] [d/l]
Re^4: how can i avoid double quotes in options of start tag by LanX (Saint) on Apr 23, 2019 at 11:18 UTC
Re^3: how can i avoid double quotes in options of start tag by LanX (Saint) on Apr 23, 2019 at 11:11 UTC
please provide real samples Cheers Rolf _{(addicted to the Perl Programming Language :) Wikisyntax for the Monastery FootballPerl is like chess, only without the dice}	[reply]
Re^4: how can i avoid double quotes in options of start tag by phoenix007 (Sexton) on Apr 23, 2019 at 11:51 UTC
Re^5: how can i avoid double quotes in options of start tag by LanX (Saint) on Apr 23, 2019 at 13:30 UTC


Come for the quick hacks, stay for the epiphanies.
	PerlMonks