print a({-href => $dangerous}, escapeHTML($dangerous));