cgi-bin/maps/lpimp_ibl/chromosome1.pl

   1 use strict;
   2 use CXGN::Page;
   3 my $page=CXGN::Page->new("chromosome1.html","html2pl converter");
   4 $page->header("Mapping information for chromosome 1");
   5 print<<END_HEREDOC;
   6
   7   <center>
   8
   9
  10     <h1>Chromosome 1</h1>
  11 <img alt="" src="/documents/maps/lpimp_ibl/IMAGES/lycopimp1.png" usemap="#synteny_map_chr1" />
  12 <map name="synteny_map_chr1" id="synteny_map_chr1">
  13
  14       <area alt="" coords="370,92,487,102" href=
  15       "/search/markers/markerinfo.pl?marker_id=185" />
  16       <area alt="" coords="370,139,481,149" href=
  17       "/search/markers/markerinfo.pl?marker_id=109" />
  18       <area alt="" coords="370,318,478,329" href=
  19       "/search/markers/markerinfo.pl?marker_id=93" />
  20       <area alt="" coords="370,527,485,538" href=
  21       "/search/markers/markerinfo.pl?marker_id=202" />
  22       <area alt="" coords="370,641,457,652" href=
  23       "/search/markers/markerinfo.pl?marker_id=107" />
  24       <area alt="" coords="370,774,490,785" href=
  25       "/search/markers/markerinfo.pl?marker_id=529" />
  26       <area alt="" coords="370,974,485,985" href=
  27       "/search/markers/markerinfo.pl?marker_id=207" />
  28       <area alt="" coords="370,1012,473,1023" href=
  29       "/search/markers/markerinfo.pl?marker_id=62" />
  30       <area alt="" coords="370,1032,483,1043" href=
  31       "/search/markers/markerinfo.pl?marker_id=140" />
  32       <area alt="" coords="370,1108,481,1118" href=
  33       "/search/markers/markerinfo.pl?marker_id=3180" />
  34       <area alt="" coords="370,1249,471,1260" href=
  35       "/search/markers/markerinfo.pl?marker_id=150" />
  36       <area alt="" coords="370,1306,485,1317" href=
  37       "/search/markers/markerinfo.pl?marker_id=135" />
  38       <area alt="" coords="370,1449,473,1460" href=
  39       "/search/markers/markerinfo.pl?marker_id=170" />
  40       <area alt="" coords="370,1515,483,1526" href=
  41       "/search/markers/markerinfo.pl?marker_id=80" />
  42       </map>
  43   </center>
  44 END_HEREDOC
  45 $page->footer();