cgi-bin/maps/lpimp_ibl/chromosome8.pl

   1 use strict;
   2 use CXGN::Page;
   3 my $page=CXGN::Page->new("chromosome8.html","html2pl converter");
   4 $page->header("Mapping information for chromosome 8");
   5 print<<END_HEREDOC;
   6
   7   <center>
   8
   9     <h1>Chromosome
  10     8</h1><img alt="" src="/documents/maps/lpimp_ibl/IMAGES/lycopimp8.png" usemap=
  11     "#synteny_map_chr8" /> <map name="synteny_map_chr8" id=
  12     "synteny_map_chr8">
  13       <area alt="" coords="370,59,490,70" href=
  14       "/search/markers/markerinfo.pl?marker_id=139" />
  15       <area alt="" coords="370,248,458,259" href=
  16       "/search/markers/markerinfo.pl?marker_id=3142" />
  17       <area alt="" coords="370,400,483,411" href=
  18       "/search/markers/markerinfo.pl?marker_id=214" />
  19       <area alt="" coords="370,506,484,516" href=
  20       "/search/markers/markerinfo.pl?marker_id=111" />
  21       <area alt="" coords="370,562,471,573" href=
  22       "/search/markers/markerinfo.pl?marker_id=69" />
  23       <area alt="" coords="370,648,491,658" href=
  24       "/search/markers/markerinfo.pl?marker_id=3189" />
  25       <area alt="" coords="370,790,472,801" href=
  26       "/search/markers/markerinfo.pl?marker_id=673" />
  27       <area alt="" coords="370,876,470,886" href=
  28       "/search/markers/markerinfo.pl?marker_id=44" />
  29     </map>
  30   </center>
  31 END_HEREDOC
  32 $page->footer();