[linux] OT:perl

Stefan Valastan valastar na pobox.sk
Čtvrtek Červenec 17 09:20:38 CEST 2003


Dik pomohlo mi to, ale mal by som jednu otazku
celemu tomu regexpu rozumiem az na tuto jednotku na konci {1}
Mohol by si mi vysvetlit ze co znamena?

Steve


> On Wed, 16 Jul 2003, Stefan Valastan wrote:
> 
> > Mam takyto problem v perle a nejako ho neviem vyriesit
> > Mam pole
> > @core  ktore je naplnene jednotlivymi prvkami z vyhladavania find
> > Hodnota prvku v poli je:
> > /home/user/stevo.user.bat
> > /home/user/robo.user.bat
> > atd.
> > no a ja potrebuje tie prvky v tom poli osekat tak aby som ich 
dostal
> > z toho pola v tvare:
> > stevo.user
> > robo.user
> 
> Zrejme existuje nato nejaky sofistikovany "ARRAY WALK", ktory to 
spravi
> strasne efektivne. Ak to niekto vie, sem s nim.
> 
> No a tuto pomale proven riesenie:
> 
>     for ($i = 0; $i < scalar(@core); $i++) {
>         $core[$i] = substr($core[$i], 0, -4);
>         @array    = split('/', $core[$i]);
>         $core[$i] = $array[length($array) - 1];
>     }
> 
> Predpokladam vsak, ze si chcel asi regexp:
> 
>     for ($i = 0; $i < scalar(@core); $i++) {
>         $core[$i] =~ s{^.*/([^/]*).bat$}{$1}g;
>     }
> 
> Dufam, ze to pomohlo.
> 
> --
>   _/|   Ondrej Jombik - nepto na php.net - http://www.nepto.sk - 
OJ812-RIPE
>  <_  \  Platon SDG - open source software development - http:
//platon.sk
>    `\|  Nech operacia X na mnozine G tvori grupu, potom plati...  
rundu!
>     '`
> _______________________________________________
> http://lists.linux.sk/listinfo/linux
> Prehladavanie archivu: http://search.lists.linux.sk
> Meta FAQ: http://faq.lists.linux.sk
> 

====================== REKLAMA =================================
Vyrazne zlavy pocitacov a prislusenstva
Sun Fire V210 server v cenach uz od 125.000,- Sk bez DPH
Navstivte nas na adrese http://www.somi.sk/sun/lowend_servery.php
================================================================




Další informace o konferenci linux