CPAN is your friend, my friend! ;-).
Let me suggest you use this module
CGI::Imagemap to build your HTMLized image maps via a Perl CGI script. Refer to the module documentation for more info (I found it very clear and descriptive).
Hope this helps! ;)
_____________________
$"=q;grep;;$,=q"grep";for(`find . -name ".saves*~"`){s;$/;;;/(.*-(\d+)
+-.*)$/;$_=["ps -e -o pid | "," $2 | "," -v "," "]`@$_`?{print"
++ $1"}:{print"- $1"}&&`rm $1`;print"\n";}