Re: Jak wyciagnac linie z pliku?

Article View: pl.comp.lang.perl

Article #51902

#51902

From: Bartosz Feński aka fEnIo
Date: Thu, 20 May 2010 17:00

25 lines
2038 bytes

W artykule lrem@localhost.localdomain napisał(a):

>>>> Na przykład tak, chociaż zaraz Ci ktoś jednolinijkowca wklei ;)
>>>
>>> #v+
>>> perl -e 'use strict; use warnings FATAL => qw( all ); my $previous=""; while (<STDIN>) { chomp; print $previous . "\n" if (/vert/); $previous=$_; }'
>>> #v-
>>>
>>> Proszę bardzo ;]
>>
>> Mogłem doprecyzować ;P
>
> A to doprecyzuj, może być ciekawie.

Chodziło mi o jakieś bardziej golfowe rozwiązanie. 
Może jakiś wyjadacz się pokusi ;)

pozdr,
fEnIo

-- 
  ,''`.  Bartosz Fenski | mailto:fenio@debian.org | pgp:0x13fefc40 | irc:fEnIo
 : :' :       32-050 Skawina - Glowackiego 3/15 - malopolskie v. - Poland
 `. `'           phone:+48602383548 | proud Debian maintainer and user
   `-            http://fenski.pl | xmpp:fenio@jabber.org | rlu:172001

Technical Details

Message-ID: <slrnhvaqle.5je.fenio@serwer.fenski.pl>

Path:

mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!news.onet.pl!serwer.fenski.pl!not-for-mail

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> <ht2slh$djl$1@solani.org> <slrnhva99s.hu6.tomjas@krusty.localdomain> <slrnhva9ub.5je.fenio@serwer.fenski.pl> <slrnhvabsv.bur.lrem@localhost.localdomain> <slrnhvaboa.5je.fenio@serwer.fenski.pl> <slrnhvanvt.bur.lrem@localhost.localdomain>

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.rmf.pl!agh.edu.pl!news.agh.edu.pl!news.onet.pl!serwer.fenski.pl!not-for-mail
From: Bartosz Feński aka fEnIo <fenio@debian.org>
Newsgroups: pl.comp.lang.perl
Subject: Re: Jak wyciagnac linie z pliku?
Date: Thu, 20 May 2010 19:00:30 +0200
Organization: Front Wyzwolenia Krasnali Ogrodowych
Lines: 25
Message-ID: <slrnhvaqle.5je.fenio@serwer.fenski.pl>
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> <ht2slh$djl$1@solani.org> <slrnhva99s.hu6.tomjas@krusty.localdomain> <slrnhva9ub.5je.fenio@serwer.fenski.pl> <slrnhvabsv.bur.lrem@localhost.localdomain> <slrnhvaboa.5je.fenio@serwer.fenski.pl> <slrnhvanvt.bur.lrem@localhost.localdomain>
Reply-To: fenio@debian.org
NNTP-Posting-Host: serwer.fenski.pl
Mime-Version: 1.0
X-Trace: news.onet.pl 1274374861 29274 188.165.20.211 (20 May 2010 17:01:01 GMT)
X-Complaints-To: niusy@onet.pl
NNTP-Posting-Date: Thu, 20 May 2010 17:01:01 +0000 (UTC)
User-Agent: slrn/pre1.0.0-18 (Linux)
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Reply to Parent Message