Solo pregunto si se podia, te digo que soy muy malo en perl, de hecho no se nada de este, por eos pregunto, tal vez fue tonta mi pregunta :')
Azielito si todos nacieramos sabiendo no creo que todavía estubieramos viviendo dependizados del petroleo.
#!/usr/local/perl
open(manejador
, 'auditorias.txt'); # abre los links $cantidad = 0;
while(<manejador>){ # while por cada linea hasta que sea null (haya terminado)
$cantidad++;
chomp; # Termina la cadena apache[$cantidad] = $_;
}
Con esto puedes reemplazar el array de @apache para que cada linea del texto se transforme en un array.
De esta misma forma hasta puedes separar por funciones y hacer escaneos para LFI, RFI, SQLI etc anteponiendo un id al comienzo de cada ruta como por ejemplo LFI:RUTA y con split separas lo que vas a auditar con la ruta y vas testeando y enviando los datos a la función correspondiente.