Estoy teniendo un problema en un código muy simple, y es tan simple que no puede encontrar el error por lo cual no puede compilarse...
Estoy tratando de encontrar una línea dentro del archivo de configuración del Apache...
el código es el siguiente:
Using perl Syntax Highlighting
#!/usr/bin/perl -w
$dominio="dominio.com.ar";
$archivo="/root/httpd.conf.bk";
$servername="ServerAlias $dominio";
open(APACHE,"$archivo");
while(<APACHE>)
{
$linea=_$;
if( "$linea" eq "$servername" )
{
print "La línea está";
}
}
close (APACHE)
$dominio="dominio.com.ar";
$archivo="/root/httpd.conf.bk";
$servername="ServerAlias $dominio";
open(APACHE,"$archivo");
while(<APACHE>)
{
$linea=_$;
if( "$linea" eq "$servername" )
{
print "La línea está";
}
}
close (APACHE)
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
Y los errores que me da son los siguientes...
- Código: Seleccionar todo
syntax error at ./apache.pl line 15, near ")
{"
syntax error at ./apache.pl line 18, near "}"
Execution of ./apache.pl aborted due to compilation errors.
Pero en la línea 15 y 18 no hay mucho más que hacer
¿¿ Dónde podría estar el error o qué estoy haciendo mal ??
¡¡¡Saludos y muchas gracias como siempre!!!
Guille
