cgi-bin/maps/lpimp_ibl/chromosome11.pl

   1 use strict;
   2 use CXGN::Page;
   3 my $page=CXGN::Page->new("chromosome11.html","html2pl converter");
   4 $page->header("Mapping information for chromosome 11");
   5 print<<END_HEREDOC;
   6
   7   <center>
   8
   9     <h1>Chromosome 11</h1>
  10 <img alt="" src="/documents/maps/lpimp_ibl/IMAGES/lycopimp11.png" usemap="#synteny_map_chr11" />
  11 <map name="synteny_map_chr11" id="synteny_map_chr11">
  12       <area alt="" coords="370,71,490,81" href=
  13       "/search/markers/markerinfo.pl?marker_id=355" />
  14       <area alt="" coords="370,231,491,242" href=
  15       "/search/markers/markerinfo.pl?marker_id=71" />
  16       <area alt="" coords="370,441,491,451" href=
  17       "/search/markers/markerinfo.pl?marker_id=212" />
  18       <area alt="" coords="370,592,469,603" href=
  19       "/search/markers/markerinfo.pl?marker_id=68" />
  20       <area alt="" coords="370,696,490,707" href=
  21       "/search/markers/markerinfo.pl?marker_id=125" />
  22       <area alt="" coords="370,886,472,897" href=
  23       "/search/markers/markerinfo.pl?marker_id=178" />
  24       <area alt="" coords="370,954,474,964" href=
  25       "/search/markers/markerinfo.pl?marker_id=24" />
  26       <area alt="" coords="370,992,430,1002" href=
  27       "/search/markers/markerinfo.pl?marker_id=3182" />
  28       <area alt="" coords="370,1087,472,1097" href=
  29       "/search/markers/markerinfo.pl?marker_id=151" />
  30       </map>
  31   </center>
  32 END_HEREDOC
  33 $page->footer();