cgi-bin/maps/lpimp_ibl/chromosome7.pl

   1 use strict;
   2 use CXGN::Page;
   3 my $page=CXGN::Page->new("chromosome7.html","html2pl converter");
   4 $page->header("Mapping information for chromosome 7");
   5 print<<END_HEREDOC;
   6
   7   <center>
   8
   9     <h1>Chromosome 7</h1>
  10
  11     <img alt="" src="/documents/maps/lpimp_ibl/IMAGES/lycopimp7.png" usemap="#synteny_map_chr7" />
  12     <map name="synteny_map_chr7" id="synteny_map_chr7">
  13       <area alt="" coords="370,72,472,83" href=
  14       "/search/markers/markerinfo.pl?marker_id=99" />
  15       <area alt="" coords="370,518,461,529" href=
  16       "/search/markers/markerinfo.pl?marker_id=59" />
  17       <area alt="" coords="370,537,484,548" href=
  18       "/search/markers/markerinfo.pl?marker_id=101" />
  19       <area alt="" coords="370,594,480,605" href=
  20       "/search/markers/markerinfo.pl?marker_id=3126" />
  21       <area alt="" coords="370,689,489,700" href=
  22       "/search/markers/markerinfo.pl?marker_id=138" />
  23       <area alt="" coords="370,718,469,728" href=
  24       "/search/markers/markerinfo.pl?marker_id=172" />
  25       <area alt="" coords="370,880,471,890" href=
  26       "/search/markers/markerinfo.pl?marker_id=203" />
  27       <area alt="" coords="370,1051,470,1061" href=
  28       "/search/markers/markerinfo.pl?marker_id=175" />
  29       <area alt="" coords="370,1135,482,1146" href=
  30       "/search/markers/markerinfo.pl?marker_id=224" />
  31       </map>
  32   </center>
  33 END_HEREDOC
  34 $page->footer();