use Cwd;
die "No CLAMD_PATH environment!" unless $ENV{CLAMD_PATH};
open(CONF, ">clamav.conf") || die "Cannot write: $!";
my $dir = cwd;
print CONF <<"EOCONF";
LocalSocket $dir/clamsock
Foreground
MaxThreads 1
ScanArchive
ArchiveMaxFileSize 1M
ArchiveMaxRecursion 1
ArchiveMaxFiles 2
EOCONF
close CONF;