for $i ( 0 .. 23 )
    {
    $tit=$info[$i]{'TIT'};
    $mfr=$info[$i]{'MFR'};
    $mes=$info[$i]{'MES'};

    $c="$dpmg/$mes.$epng";   
    if (-e $c) 
      { 
      $c2="<IMG src='$c'>";
      } 
    else 
      { 
      $c2="<IMG src='$dimg/_x2.png'>"; 
      }

    $d="$dpmg/$mes.$epng";
    $d2="<IMG src='$d'>";

    $e="$dpud/$mes.$eaud";   
    if (-e $e)
      { 
      $e="$daud/$mes.$eaud";   
      $e2="<IMG src=\"$dimg/_v1.png\" onclick=\"au.src='$e'; au.play();\" >"; 
      } 
    else 
      { 
      $e2="<IMG src='$dimg/_v0.png'>"; 
      }

    print "<DIV>$tit</DIV>  <DIV>$mfr</DIV>  <DIV>$mes</DIV>  <DIV class='fn'>$c</DIV> $c2  <DIV class='fn'>$d</DIV> $d2 $e2 <BR>\n";
    }