Help for this page
print table(tr(td(a(-href=>'http://google.com',"http://google.com"))))
print "<table><tr><td><a href='http://google.com'>http://google.com</a +></td></tr></table>";