Something like this works relatively straightforwardly:
print "<pre>", HTML::Entities::encode_entities( Dumper( \%ENV ) ), "</pre>\n";