cgi-bin/maps/lpimp_ibl/chromosome9.pl

   1 use strict;
   2 use CXGN::Page;
   3 my $page=CXGN::Page->new("chromosome9.html","html2pl converter");
   4 $page->header("Mapping information for chromosome 9");
   5 print<<END_HEREDOC;
   6
   7   <center>
   8
   9 <h1>Chromosome 9</h1>
  10 <img alt="" src="/documents/maps/lpimp_ibl/IMAGES/lycopimp9.png" usemap="#synteny_map_chr9" />
  11 <map name="synteny_map_chr9" id="synteny_map_chr9">
  12       <area alt="" coords="370,68,485,79" href=
  13       "/search/markers/markerinfo.pl?marker_id=168" />
  14       <area alt="" coords="370,286,472,297" href=
  15       "/search/markers/markerinfo.pl?marker_id=518" />
  16       <area alt="" coords="370,315,471,325" href=
  17       "/search/markers/markerinfo.pl?marker_id=665" />
  18       <area alt="" coords="370,572,488,582" href=
  19       "/search/markers/markerinfo.pl?marker_id=74" />
  20       <area alt="" coords="370,742,483,753" href=
  21       "/search/markers/markerinfo.pl?marker_id=193" />
  22       <area alt="" coords="370,799,458,810" href=
  23       "/search/markers/markerinfo.pl?marker_id=649" />
  24       <area alt="" coords="370,941,467,952" href=
  25       "/search/markers/markerinfo.pl?marker_id=21" />
  26       <area alt="" coords="370,1056,482,1066" href=
  27       "/search/markers/markerinfo.pl?marker_id=171" />
  28       </map>
  29   </center>
  30 END_HEREDOC
  31 $page->footer();