my @data = @_;
shift @data;
- my ($key, $shareID,undef,$name,$path,undef,$date,undef,$size) = @_;
+ my ($key, $shareID,undef,$name,$path,$date,undef,$size) = @_;
return $beenThere->{$key} if (defined($beenThere->{$key}));
path = ? and
date = ? and
size = ?
+ LIMIT 1
});
my @param = ($shareID,$path,$date,$size);
$sth->{file_in_db}->execute(@param);
my $rows = $sth->{file_in_db}->rows;
- print STDERR "## found_in_db ",( $rows ? '+' : '-' ), join(" ",@param), "\n" if ($debug >= 3);
+ print STDERR "## found_in_db($shareID,$path,$date,$size) ",( $rows ? '+' : '-' ), join(" ",@param), "\n" if ($debug >= 3);
$beenThere->{$key}++;