Path: usenet.cis.ufl.edu!usenet.eel.ufl.edu!psgrain!nntp.teleport.com!usenet

Path: usenet.cis.ufl.edu!usenet.eel.ufl.edu!psgrain!nntp.teleport.com!usenet
From: [email protected] (Mike Heins)
Newsgroups: comp.lang.perl.announce,comp.lang.perl.misc
Subject: ANNOUNCE: CGI Imagemap Module V1.00
Followup-To: comp.lang.perl.misc
Date: 2 Mar 1996 17:22:45 GMT
Organization: University of Illinois at Urbana
Lines: 101
Approved: [email protected] (comp.lang.perl.announce)
Message-ID: <[email protected]>
NNTP-Posting-Host: kelly.teleport.com
Keywords: CGI module imagemap perl
X-Disclaimer: The "Approved" header verifies header information for article transmission and does not imply approval of content.
Xref: usenet.cis.ufl.edu comp.lang.perl.announce:280 comp.lang.perl.misc:22472

CGI::Imagemap 1.00 is now available at your local CPAN site as

"CPAN"/authors/id/MIKEH/CGI_Imagemap-1.00.tar.gz

CGI::Imagemap allows CGI programmers to place TYPE=IMAGE form fields on
their HTML fill-out forms, with either client-side or server-side maps
emulated.

The imagemap file follows that of the NCSA imagemap program. Each point
is an x,y tuple. Each line in the map consists of one of the following
formats. Comment lines start with "#".

circle action center edgepoint
rect action upperleft lowerright
point action point
poly action point1 point2 ... pointN
default action

Using "point" and "default" in the same map makes no sense. If "point"
is used, the action for the closest one is selected.

To use CGI::Imagemap, define an image submit map on your form with
something like:

<input type=image name=mv_todo SRC="image_url">

You can pass a "client-side" imagemap like this:

<input type="hidden" name="todo.map" value="rect action1 0,0 25,20">
<input type="hidden" name="todo.map" value="rect action2 26,0 50,20">
<input type="hidden" name="todo.map" value="rect action3 51,0 75,20">
<input type="hidden" name="todo.map" value="default action0">

CLASS METHODS

$map->setmap(@map);
$map->addmap(@add);
$map->untaint('yes');
$action = $map->action($x,$y,@map);
$action = $map->action($x,$y,$map);

STATIC METHODS

action_map($x,$y,@map);
map_untaint(1);

AUTHOR
Send bug reports, kudos, complaints, and suggestions
to Mike Heins, <[email protected]>

CREDITS
This work is heavily kited from the Perl imagemap program
originally written by V. Khera <[email protected]>.

AVAILABLE AT CPAN

The master CPAN site is at ftp://ftp.funet.fi/
(Finland, Europe). Select the site nearest to you from the list
below to get the best response time and bandwidth.

Africa
South Africa ftp://ftp.is.co.za/programming/perl/CPAN/

Asia
Japan ftp://ftp.lab.kdd.co.jp/lang/perl/CPAN/
Taiwan ftp://dongpo.math.ncu.edu.tw/perl/CPAN/

Australasia
Australia ftp://coombs.anu.edu.au/pub/perl/
ftp://ftp.mame.mu.oz.au/pub/perl/CPAN/
New Zealand ftp://ftp.tekotago.ac.nz/pub/perl/CPAN/

Europe
Czech Republic ftp://sunsite.mff.cuni.cz/Languages/Perl/CPAN/
Finland ftp://ftp.funet.fi/pub/languages/perl/CPAN/
France ftp://ftp.ibp.fr/pub/perl/CPAN/
ftp://ftp.pasteur.fr/pub/computing/unix/perl/CPAN/
Germany ftp://ftp.leo.org/pub/comp/programming/languages/perl/CPAN/
ftp://ftp.rz.ruhr-uni-bochum.de/pub/CPAN/
the Netherlands ftp://ftp.cs.ruu.nl/pub/PERL/CPAN/
Poland ftp://ftp.pk.edu.pl/pub/lang/perl/CPAN/
Portugal ftp://ftp.ci.uminho.pt/pub/lang/perl/
Slovenia ftp://ftp.arnes.si/software/perl/CPAN/
Sweden ftp://ftp.sunet.se/pub/lang/perl/CPAN/
Switzerland ftp://ftp.switch.ch/mirror/CPAN/
UK ftp://ftp.demon.co.uk/pub/mirrors/perl/CPAN/
ftp://unix.hensa.ac.uk/mirrors/perl-CPAN/

North America
British Columbia ftp://mango.softwords.bc.ca/pub/perl/CPAN/
California ftp://ftp.cdrom.com/pub/perl/CPAN/
Florida ftp://ftp.cis.ufl.edu/pub/perl/CPAN/
Illinois ftp://uiarchive.cso.uiuc.edu/pub/lang/perl/CPAN/
Massachusetts ftp://ftp.delphi.com/pub/mirrors/packages/perl/CPAN/
Oklahoma ftp://ftp.uoknor.edu/mirrors/CPAN/
Texas ftp://ftp.sedl.org/pub/mirrors/CPAN/
ftp://ftp.metronet.com/pub/perl/
ftp://ftp.sterling.com/CPAN/