Probleme mit Perl Skript

[Alexander Rebholz]

Hallo!

Nachdem nun das Bilder Problem gelöst ist (siehe weiterer Thread von mir) wird nun immer das Bild nopic.jpg angezeigt. Das seltsame ist, wenn ich die if-Abfrage weglasse sowie den nopic.jpg Teil, werden alle Bilder korrekt angezeigt. Irgendwie liegt es wohl an dem "if (-e $pic)". Ab es existiert ja so ein Bild?

Auszug Quelltext:

chomp($_);
($nummer, $name, $preis) = split(/&/, $_);
$pic = '/bilder/' . $nummer . '.jpg';
if (-e $pic)
{
print '<tr><td valign="middle">';
print '<IMG SRC="/bilder/' . $nummer .'.jpg"></td>';
print '<td valign="top">';
}
else
{
print '<tr><td valign="middle">';
print '<IMG SRC="/bilder/nopic.jpg"></td>';
print '<td valign="top">';
}

TIA, Alex