Article View: pl.comp.lang.perl
Article #51895Re: Jak wyciagnac linie z pliku?
From: Stachu 'Dozzie' K.
Date: Thu, 20 May 2010 08:42
Date: Thu, 20 May 2010 08:42
31 lines
2261 bytes
2261 bytes
On 2010-05-20, tomjas <tomjas@WYTNIJTOpoczta.onet.pl> wrote:
> On Thu, 20 May 2010 06:59:41 +0000 (UTC), Stachu 'Dozzie' K. wrote:
>>
>> No to kombinuj, bo to podstawy programowania _w ogóle_.
>>
> Tos mi doradzil. Kombinuje i wymyslilem takie cos:
>
> while (<IN>) {
> push (@lista,$_)
> if (/vert/) {
> $line = pop @lista;
> push(@plik,$line);
> }
> }
> print @plik;
>
> ale odnosze nieodparte wrazenie, ze jest to, delikatnie mowiac, malo
> eleganckie rozwiazanie.
O widzisz, zupełnie inaczej teraz wygląda twoje pytanie niż na początku
wątku.
Nieeleganckie jest dlatego, że @plik może ci bardzo urosnąć, poza tym
nie do końca ten kod jest zgodny z pytaniem oryginalnym.
Ja to zrozumiałem tak: wypisać wszystkie linie od początku pliku do
pierwszego wystąpnienia /vert/; pozostałe pominąć.
--
Secunia non olet.
Stanislaw Klekot
Technical Details
Message-ID:
<ht2slh$djl$1@solani.org>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!nf1.ipartners.pl!ipartners.pl!plix.pl!newsfeed1.plix.pl!news-out1.kabelfoon.nl!newsfeed.kabelfoon.nl!bandi.nntp.kabelfoon.nl!news2.euro.net!feeder.news-service.com!weretis.net!feeder3.news.weretis.net!news.solani.org!not-for-mailReferences:
<slrnhv9krv.q2.tomjas@krusty.localdomain> <ht2lp9$uan$1@solani.org> <slrnhv9nc7.6re.tomjas@krusty.localdomain> <ht2mkt$uan$2@solani.org> <slrnhv9pgv.7eh.tomjas@krusty.localdomain>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!nf1.ipartners.pl!ipartners.pl!plix.pl!newsfeed1.plix.pl!news-out1.kabelfoon.nl!newsfeed.kabelfoon.nl!bandi.nntp.kabelfoon.nl!news2.euro.net!feeder.news-service.com!weretis.net!feeder3.news.weretis.net!news.solani.org!not-for-mail From: "Stachu 'Dozzie' K." <dozzie@go.eat.some.screws.spammer.invalid> Newsgroups: pl.comp.lang.perl Subject: Re: Jak wyciagnac linie z pliku? Date: Thu, 20 May 2010 08:42:25 +0000 (UTC) Organization: solani.org Lines: 31 Message-ID: <ht2slh$djl$1@solani.org> References: <slrnhv9krv.q2.tomjas@krusty.localdomain> <ht2lp9$uan$1@solani.org> <slrnhv9nc7.6re.tomjas@krusty.localdomain> <ht2mkt$uan$2@solani.org> <slrnhv9pgv.7eh.tomjas@krusty.localdomain> Mime-Version: 1.0 X-Trace: solani.org 1274344945 13941 eJwNyckBwDAIA7CVUrA5xqEQ9h+h1VdUe6wdRgOXOxklDJxTYemXw6ZmYeTPRVvcoY66OAXvBxHJELg= (20 May 2010 08:42:25 GMT) X-Complaints-To: abuse@news.solani.org NNTP-Posting-Date: Thu, 20 May 2010 08:42:25 +0000 (UTC) X-User-ID: eJwNyMEBwCAMAsCVTA2BjlOV7D+CvedhVtRmFirRaOpbgxpKP5xweBS3ib98aGWodBYpdfu9CJkQpA== Cancel-Lock: sha1:zp/z8nEuqW+mODQFnbBSKaCIGuQ= User-Agent: slrn/pre0.9.9-111 (Linux) X-NNTP-Posting-Host: eJwNysEBwCAIA8CVGiVBxgEq+4/Q3vu4BbWbKONwEtvjws+s6nnV9+DxiFpRNpk0uv0fCCmIDx0YEIg= Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit