Re: cuestion de perl

Article View: es.comp.os.linux.programacion

Article #10185

Back to es.comp.os.linux.programacion Previous Next

#10185

From: Jos� Luis P�rez Diez
Date: Wed, 20 Mar 2002 12:57

22 lines
1886 bytes

In article <a79pr5$jnm1r$1@ID-59646.news.dfncis.de>, [ Z A T O P E K ] wrote:
> if (!($buzon eq $user)) {
          ^        ^ ninguna de estas dos variables esta definida  es igual a                      
if (0)  o if (!(1))
> open (a1, '/etc/mail/access.tmp'); 
            ^  el fichero esta vacio

Por que no escapas todos los caracteres susceptibles de causar problemas en una  
expresion regular y usas en resultante( $expr) e una expresion regular en un 
bucle 
wile <> { #mientras haya entradas util para usar como filtro
  my $linea = $_;
  if (=~ /$expr/u) #si coincide con emilio ignarando el caso
  {} #nada
  else {print $linea) #Buena
}while

--
Los programadores esta ocupados intendtado mejorar los programas a prueba de 
idiotas. Mientras tanto el universo  intenta mejorar los idiotas. El universo 
va ganando

Technical Details

Message-ID: <VA.0000031d.01285da4@noemai.com>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!cyclone.bc.net!news-hog.berkeley.edu!ucberkeley!enews.sgi.com!news-out.spamkiller.net!propagator-la!news-in-la.newsfeeds.com!news-in.superfeed.net!caladan.arrakis.es!newsfeed.mad.ttd.net!nsnmpen1-lo.nuria.telefonica-data.net!news.bcn.ttd.net!not-for-mail

References: <a79pr5$jnm1r$1@ID-59646.news.dfncis.de>

Show Full Headers

Complete Article Headers

X-Google-Language: SPANISH,ASCII-7-bit
X-Google-Thread: f86c8,97a7023fec9bff1d
X-Google-Attributes: gidf86c8,public
X-Google-ArrivalTime: 2002-03-20 06:05:27 PST
From: Jos� Luis P�rez Diez <Jluis@noEmai.com>
Newsgroups: es.comp.os.linux.programacion
Subject: Re: cuestion de perl
Date: Wed, 20 Mar 2002 13:57:23 +0100
Organization: JPD Co
Lines: 23
Message-ID: <VA.0000031d.01285da4@noemai.com>
References: <a79pr5$jnm1r$1@ID-59646.news.dfncis.de>
Reply-To: Jluis@noEmai.com
NNTP-Posting-Host: 195.77.105.176
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: 8bit
X-Newsreader: Virtual Access by Atlantic Coast PLC, http://www.atlantic-coast.com/va
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!cyclone.bc.net!news-hog.berkeley.edu!ucberkeley!enews.sgi.com!news-out.spamkiller.net!propagator-la!news-in-la.newsfeeds.com!news-in.superfeed.net!caladan.arrakis.es!newsfeed.mad.ttd.net!nsnmpen1-lo.nuria.telefonica-data.net!news.bcn.ttd.net!not-for-mail

Reply to Parent Message