Article View: es.comp.os.linux.programacion
Article #10324Re: analizar un fichero de texto con perl
From: Jes
Date: Thu, 07 Mar 2002 19:08
Date: Thu, 07 Mar 2002 19:08
37 lines
1853 bytes
1853 bytes
No parece muy dificil pero esperar que te hagan el script es mucho esperar
creo yo. Otra cosa seria que tuvieras un problema con el codigo y aqui te
echaramos una mano....
Te pongo algo de codigo a ver si te haces una idea. Estoy escribiendo de
memoria asi que puede que cometa algun error...
my $file = "/var/log/radius.log";
open ( INPUT << $file ) or
die "Error. I cant access $file\n";
while (INPUT)
{
my ($param,$value) = split('=',$_);
*******
*******
******
}
close INPUT;
donde he puesto los asteriscos ****** deberia ir tu codigo. Ahi tendrias
que comprobar si estas leyendo el parametro Acct-Status-Type o el que sea
y chequear su valor.......
El script es mas complicado que eso, pero espero que te de alguna idea de
por donde enfocar la lectura del fichero. El tratamiento de la informacion
es cosa tuya.
Saludos,
--
Jes
jjess@gmx.net
-------------
Anthony's Law of Force:
Don't force it; get a larger hammer.
Technical Details
Message-ID:
<hrd86a.oi5.ln@alaska.the.world>Path:
arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!npeer.kpnqwest.net!news.airtel.net!alaska.the.world!nobodyReferences:
<a68473$cdh4m$1@ID-59646.news.dfncis.de>Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII-7-bit X-Google-Thread: f86c8,fbbbaeed53640129 X-Google-Attributes: gidf86c8,public X-Google-ArrivalTime: 2002-03-07 11:08:25 PST Mime-Version: 1.0 X-Newsreader: knews 1.0b.1 References: <a68473$cdh4m$1@ID-59646.news.dfncis.de> From: jjess@gmx.net (Jes) Subject: Re: analizar un fichero de texto con perl Newsgroups: es.comp.os.linux.programacion Content-Type: text/plain; charset=us-ascii Date: Thu, 7 Mar 2002 20:08:33 +0100 Message-ID: <hrd86a.oi5.ln@alaska.the.world> NNTP-Posting-Host: 212.166.136.132 X-Original-NNTP-Posting-Host: 212.166.136.132 X-Trace: news.airtel.net 1015528088 212.166.136.132 (7 Mar 2002 20:08:08 +0100) Lines: 37 Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!npeer.kpnqwest.net!news.airtel.net!alaska.the.world!nobody