cgi-bin/maps/lpimp_ibl/chromosome12.pl

   1 use strict;
   2 use CXGN::Page;
   3 my $page=CXGN::Page->new("chromosome12.html","html2pl converter");
   4 $page->header("Mapping information for chromosome 12");
   5 print<<END_HEREDOC;
   6
   7   <center>
   8
   9     <h1>Chromosome
  10     12</h1><img alt="" src="/documents/maps/lpimp_ibl/IMAGES/lycopimp12.png" usemap=
  11     "#synteny_map_chr12" /> <map name="synteny_map_chr12" id=
  12     "synteny_map_chr12">
  13       <area alt="" coords="370,70,468,80" href=
  14       "/search/markers/markerinfo.pl?marker_id=166" />
  15       <area alt="" coords="370,126,473,136" href=
  16       "/search/markers/markerinfo.pl?marker_id=94" />
  17       <area alt="" coords="370,326,483,336" href=
  18       "/search/markers/markerinfo.pl?marker_id=2978" />
  19       <area alt="" coords="370,497,460,507" href=
  20       "/search/markers/markerinfo.pl?marker_id=558" />
  21       <area alt="" coords="370,562,481,573" href=
  22       "/search/markers/markerinfo.pl?marker_id=218" />
  23       <area alt="" coords="370,611,468,621" href=
  24       "/search/markers/markerinfo.pl?marker_id=182" />
  25       <area alt="" coords="370,942,486,953" href=
  26       "/search/markers/markerinfo.pl?marker_id=657" />
  27       <area alt="" coords="370,1066,472,1077" href=
  28       "/search/markers/markerinfo.pl?marker_id=2991" />
  29       </map>
  30   </center>
  31 END_HEREDOC
  32 $page->footer();