HTML::GenerateUtil is a Perl module with routines useful when generating HTML output.
SYNOPSIS
use HTML::GenerateUtil qw(escape_html generate_attributes generate_tag escape_uri :consts);
my $Html = "text < with > things & that need x{1234} escaping";
$Html = escape_html($Html, 0);
... or ...
escape_html($Html, EH_INPLACE);
... also ...
my $Attr = generate_attributes({ href => 'http://...', title => 'blah' });
$Html = "< a $Attr >$Html< /a >";
... but even better ...
$Html = generate_tag('a', { href => 'http://...', title => 'blah' }, $Html, 0);
... also you might want something like ...
my $URI = 'http://host/?' . join ";", map { $_ => escape_uri($Params{$_}) } keys %Params;
$Html = generate_tag('a', { href => $URI }, $Html, 0);
Product's homepage
Requirements:
· Perl