@@ -2,22 +2,20 @@

 # ---- Settings ----

 # TemporaryDirectory in clamd.conf

-my($TMPDIR)='/tmp';

+my $TMPDIR='/tmp';

 # How long to wait for next part of RFC1341 message (seconds)

-my($cleanup_interval)=3600;

+my $cleanup_interval=3600;

 # ---- End of Settings ----

-my ($partial_dir) = "$TMPDIR/clamav-partial";

+my $partial_dir = "$TMPDIR/clamav-partial";

 #  if there is no partial directory, nothing to clean up

 opendir(DIR, $partial_dir) || exit 0;

-my ($cleanup_threshold) = time - $cleanup_interval;

+my $cleanup_threshold = time - $cleanup_interval;

 while(my $file = readdir(DIR)) {

 	next unless $file =~ m/^clamav-partial-([0-9]+)_[0-9a-f]{32}-[0-9]+$/;

 	my $filetime = $1;

-	if ($filetime <= $cleanup_threshold) {

-		unlink "$partial_dir/$file";

-	}

+	unlink "$partial_dir/$file" unless $filetime > $cleanup_threshold;

 }

 closedir DIR;