[Ayuda] ayuda con script Perl

[Javier Delgado]

Hola

TEngo un problema.

Tengo instalado Webalizer en mi server, y hay un script de perl para que 
cree las estadisticas de cada uno de mis sites virtuales, sin embargo el 
script tambien trata de crear estadisticas de los alias de los servers....
(pe. www.kaliman.com.mx y su alias www.kaliman.org.mx) asi que manda varios 
errores (todos los dias), pues esos directorios no existen...

Lo malo es que no se de perl para modificar el script....

este es un fragmento del script, qeu se ejecuta como un cron.daily:

---------------------------------------

# Where sites on a RaQ3/4 live
$prefix = "/home/sites";
# Status messages
my $messages;

chdir "$prefix" or die "Can't cd to $prefix??: $!\n";
opendir THEROOT, $prefix or die "Couldn't open $prefix?: $!\n";
@allsites = grep !/^\.\.?$/,  readdir THEROOT;

foreach $asite (@allsites)
{
# Aqui van las instrucciones para cada site, como:  crear los subdirectorios,
# si es que no existen, crear  el archivo .httpacces y finalmente correr el 
Webalizer

  $messages .=
        `webalizer -p -n $asite -q -T -D /home/log/reverse.dns -o $thepath 
$prefix/$asite/logs/web.log`;

}
-----------------------------------------------------
lo que quiero es añadir una instruccion para que no ejecute las acciones 
cuando el archivo

$thepath $prefix/$asite/logs/web.log`

no exista... y prefiero preguntar antes que regarla...

me peude hechar una mano con esto?

Javier






Paralax Multimedia
www.paralax.com.mx
Interactivos, kioscos, sites, web hosting, video 3d, animacion 3d, anaglifos
tel 5373 3620  y  5363 4953
Naucalpan de Juarez, Edo. Mex.

tambien visite:
http://www.kaliman.com.mx
http://www.paralax.com.mx/javier

_______________________________________________
Ayuda mailing list
Ayuda en linux.org.mx