cgi-bin/maps/lpimp_ibl/chromosome6.pl

   1 use strict;
   2 use CXGN::Page;
   3 my $page=CXGN::Page->new("chromosome6.html","html2pl converter");
   4 $page->header("Mapping information for chromosome 6");
   5 print<<END_HEREDOC;
   6
   7   <center>
   8
   9     <h1>Chromosome 6</h1>
  10 <img alt="" src="/documents/maps/lpimp_ibl/IMAGES/lycopimp6.png" usemap="#synteny_map_chr6" />
  11 <map name="synteny_map_chr6" id="synteny_map_chr6">
  12       <area alt="" coords="370,62,492,72" href=
  13       "/search/markers/markerinfo.pl?marker_id=516" />
  14       <area alt="" coords="370,165,484,176" href=
  15       "/search/markers/markerinfo.pl?marker_id=106" />
  16       <area alt="" coords="370,289,473,299" href=
  17       "/search/markers/markerinfo.pl?marker_id=509" />
  18       <area alt="" coords="370,478,473,489" href=
  19       "/search/markers/markerinfo.pl?marker_id=53" />
  20       <area alt="" coords="370,592,491,603" href=
  21       "/search/markers/markerinfo.pl?marker_id=76" />
  22       <area alt="" coords="370,754,483,765" href=
  23       "/search/markers/markerinfo.pl?marker_id=216" />
  24       <area alt="" coords="370,812,468,822" href=
  25       "/search/markers/markerinfo.pl?marker_id=3187" />
  26       <area alt="" coords="370,869,472,879" href=
  27       "/search/markers/markerinfo.pl?marker_id=3113" />
  28       <area alt="" coords="370,906,484,917" href=
  29       "/search/markers/markerinfo.pl?marker_id=130" />
  30       </map>
  31   </center>
  32 END_HEREDOC
  33 $page->footer();