sub view_begin { my ($self, $begin) = @_; return '' unless $begin->format() =~ /\bhtml\b/; my $output = $begin->content->present($self); for($output){ s/&/&/gi; s/"/\"/gi; s/>/>/gi; s/</