<%
use Image::Size; my ($x,$y) = imgsize("${appdir}/_filebank/$value[3]"); $y = $y * $SE{img3}/$x;
$value[3] ? $value[2] ? qq( )
: qq() : qq() %> |
<%
use Image::Size; my ($x,$y) = imgsize("${appdir}/_filebank/$value[5]"); $y = $y * $SE{img3}/$x;
$value[5] ? $value[12] ? qq( )
: qq() : qq() %> |
<%
use Image::Size; my ($x,$y) = imgsize("${appdir}/_filebank/$value[7]"); $y = $y * $SE{img3}/$x;
$value[7] ? $value[22] ? qq( )
: qq() : qq() %> |
| valign=top>
<% $value[0] ? qq($value[0] ) : qq() %>
<% $value[1] ? qq( $value[1] ) : qq() %>
|
valign=top>
<% $value[10] ? qq($value[10] ) : qq() %>
<% $value[11] ? qq( $value[11] ) : qq() %>
|
valign=top>
<% $value[20] ? qq($value[20] ) : qq() %>
<% $value[21] ? qq( $value[21] ) : qq() %>
|
