use CGI qw/:standard/;

print header,start_html('Link Example'),
a({href=>'http://www.host.com'},'This is a link'),end_html;