Guido Bolognesi [Zen] ha scritto:
Federico Calboli wrote:
Non ce pezza, ne con rownumbers ne con regular expression riesco a farlo
fungere (ovvero, non riesco mai in alcun modo).
Hints?
non so se esiste un tool che fa quello che chiedi.
Io scriverei
cat file | perl -e '$i=1; while (<>){print if ($i>=10 && $i<=20);$i++}'
posto che tu sappia il numero della riga (dalla 10 alla 20 comprese).
pero` si potrebbe anche fare dandogli direttamente cippa e lippa:
cat file | perl -e 'while (<>){$p=1 if (/cippa/);print if $p;$p=0 if
(/lippa/);}' #perfettibile
In perl si fa tutto ciò che si fa con sed e awk, l'equivalente
sarebbe:
cat file | perl -n -e ' print $_ if (/cippa/ ... /lippa/);'
modulo sottigliezze sulla differenza tra .. e ... che sono in
perlop(1).
Davide Bolcioni
--
Paranoia is a survival asset.
|