Dateien löschen welche zuvor über mysql abgefragt wurden

[Klaus Mock]

Hallo,

my $pathofpictures = 'f:/ApacheServer/htdocs/dateien/' ;

my $id= 'id=' ;
my $str = join " OR $id " => @werte;
$sth = $dbh->prepare("SELECT name_pic
            FROM $table1
         WHERE $id$str ") ;

IMHO wäre ein 'WHERE ID IN ('.join(',',@werte).')' oder so ähnlich eleganter.

while (my @picdel= $sth->fetchrow_array() ) {

Da nur ein Wert pro Datensatz abgefragt wird würde IMHO

while (my($picdel)= $sth->fetchrow_array() ) {

besser passen, da klarer

unless( -d $_)  {

was ist das? Welchen Wert hat gerade $_?

unlink($pathofpictures.@picdel);

und hier dann auch
             unlink($pathofpictures.$picdel);

Grüße
  Klaus