sslug-teknik team mailing list archive

[Peter Makholm <peter@xxxxxxxxxxx>]

"Brian Ipsen" <bipsen@xxxxxxxxxx> writes:

>> perl -ne 'print if 714..725'
>
> Dette returnerer kun linierne 714-725 - formålet var at få linierne 1-713 
> samt 726-EOF (altså få fjernet linierne 714-725)

Åhhh, sry. Glemte en negation da jeg læste din kravsspec.

perl -ne 'print unless 714..725'

Læs man perlop om ..-operatoren.

>> alternativt bruge sed:
>
>> sed -n '/regexp/,+11p'
>>
>> Hvor regexp er det der matcher den linje du skal slette fra.
>
> # sed -n '/pattern/,+11p/'
> sed: -e expression #1, char 11: Unexpected ','
>
> Min sed kan åbenbart ikke li' den syntaks....

Det er fordi du ikke gør som jeg skriver.

Men også her glemte jeg en negation. Der skal lige et udråbstegn ind
foran p'et.

sed -n '/regexp/,+11!p'

-- 
 Peter Makholm     |        We constantly have to keep in mind why natural
 peter@xxxxxxxxxxx |    languages are good at what they're good at. And to
 http://hacking.dk |     never forget that Perl is a human language first,
                   |                        and a computer language second