#!/usr/bin/perl
$UVDIR="/usr/local/uvscan";
$FTPHOST="ftp.mcafee.com";
$FTPDIR="/pub/antivirus/datfiles/4.x/";
$CVERSION=`$UVDIR/uvscan --version | grep "Virus data file" | cut -d" " -f4
| cut -c2-`;
$NVERSION=$CVERSION + 1;
$NDNAME="dat-$NVERSION";
system "ncftpget $FTPHOST $UVDIR $FTPDIR$NDNAME.tar 1> /dev/null 2>
/dev/null";
if ( -e "$UVDIR/$NDNAME.tar") {
print "Unpacking update v$NVERSION\n";
system "cd $UVDIR && tar -xf $NDNAME.tar && rm $NDNAME.tar";
}
else {
print "No update available.\n";
}
____ ___ _______________________________________
| | \ :Joselito Batista
| |___/ :Linux User# 228290 CL 7.0 Kernel 2.4.18
| | | \ :TV R�dio Clube de Teresina
|__| |___/ :[EMAIL PROTECTED]
____________:http://www.webpiaui.com
Assinantes em 13/03/2002: 2235
Mensagens recebidas desde 07/01/1999: 158101
Historico e [des]cadastramento: http://linux-br.conectiva.com.br
Assuntos administrativos e problemas com a lista:
mailto:[EMAIL PROTECTED]