SYNOPSIS
use CGI::Extratags;
$cgi = new CGI::Extratags;
print $cgi -> email ('[email protected]');
print $cgi -> jump ('CONTACT', 'contact us');
print $cgi -> mark ('CONTACT', $cgi -> h2 ('How to contact us'));
print $cgi -> row ('Date', 18, 1, 1966);
print $cgi -> recall ('Debian CD', artnum => '0-123456');
DESCRIPTION
CGI::Extratags adds several useful methods to the CGI class.- email ADDRESS
-
print $cgi -> email ('[email protected]');Produces HTML code for a link to an email ADDRESS.
- jump MARK TEXT
-
print $cgi -> jump ('CONTACT', 'contact us');Produces HTML code for a link pointing to a target within the current document.
- mark NAME TEXT
-
print $cgi -> mark ('CONTACT', $cgi -> h2 ('How to contact us'));Generates target NAME for hyperlinks.
- row [ITEM ...]
-
print $cgi -> row ('Date', 18, 1, 1966);Produces HTML code for a table row with ITEM arguments as cell contents.
- recall TEXT [NAME [VALUE]] ...
-
foreach my $num (sort (keys %artmap)) { print $cgi -> recall ($artmap{$num}, artnum => $num); print $cgi -> br; }Produces a link to the script itself labeled with TEXT. The NAME/VALUE pairs will be passed as parameters.