<perl>
get "userid=1", "/shop/demo/demo","weiter"; 
while(get_next("weiter")) 
{
out <<EOF;
<tr bgcolor=".($_loop%2?"ffffff":"D0D0D0").">
<td><font size="1"><center> 
    <a href="baseportal.pl?htx=/shop/demo/demoneu&db=/shop/demo/demo&Id=$_id">CHANGE</a></td>
    
    
    <td wrap width=200><font size="3"><b><center> $Device </b></font><br>
    <a href="$Picture"><img src="$PictureSmall" width="150" border=0></a>
    <br><font size="0">

    <a href="http://baseportal.de/cgi-bin/baseportal.pl?htx=/flei/free/freecli&urlgo=$Download&cliid=$_id" target="_blank">Download</a>
    </font></td>
    <td><center><font size="0"> $Description </font></center></td>
    <td><center><b><font size="1"> $Type </b></font></center></td>
    <td><center><font size="1">  $EMail<br><br>$URL</font></center></td>
    </tr>
EOF
}
</perl>