nicht angemeldet
Hi,
übler Fehler, der sich in meim Skript befand. Hab ihn gefunden. hehe, funktioniert
aber trotzdem nicht. <:-]Du gibst keinen Content-type aus - oder?
Cheatah
Hi!
Doch. Ich habs jetzt aber auch rausgefunden. Die Sourcen sind auch zu groß,
um ins Forum zu stellen - hab dabei ne Menge weggelassen. Fehler. Ich habe es mit dieser,
ein wenig modifizierter Version, realisieren können:
#!/usr/loca/perl
$searchfile= "$ENV{DOCUMENT_ROOT}/cgi-bin/links.csv";
print "Content-type: text/html\n\n";
print "<html>\n";
print "<form action="/cgi-bin/view_links.cgi" method="post">
print "<b>Movies:</b><br>\n";
print "<select name="movie" size="1">
@temping= ("");
open(SEARCH, "<$searchfile");
while(<SEARCH>)
{
chomp ($_);
@stardaten= split(/;/,$_, 4);
$temp= $stardaten[3];
$found= 0;
for(@temping)
{
if ($_ eq $temp)
{
$found= 1;
}
}
if ($found == 0)
{
push(@temping, $temp);
}
}
close(SEARCH);
for(@temping)
{
print "<option>$_</option>\n";
}
print "</select>\n";
print "<input type="submit">\n";
print "</form>\n";
print "</html>\n";