[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Re: [Debian]:: mutt/slrn: wie schneide ich bei Antworten die signatures ab?



On Sun, Oct 17, 1999 at 09:25:48PM +0200, Eduard Bloch wrote:
> Moin Niklas!
> Niklas Matthies schrieb am Sonntag, den 17. Oktober 1999:
> 
> > > Möglichkeit, die Fehlermeldungen bei Auto-Commandos abzufangen/zu
> > > unterdrücken, oder die Suche irgendwie in eine "eval"-Funktion
> > > einzugliedern. Hat jemand eine Idee?
> > 
> > Ja:
> > 
> > > "Verwende Perl. [...]
> 
> Gut, das macht dann
> 
> map ,kqs :%!~/bin/cutsig<CR>/^--<CR>k
> 
> mit:
> 
> --- ~/bin/cutsig ---
> #!/usr/bin/perl
> while(<>){if(/^> *--/){$z=1};if(/^--/){$z=0};if(!$z){print $_}}
> ------

Es geht kürzer (und IMHO von den Patterns her korrekter) mit:

   #!/usr/bin/perl -p
   $z=/^> *-- $/?1:/^[^>]/?0:$z; $_="" if $z;

Außerdem kann man das ganze auch direkt ins Mapping packen (es sei denn
man benötigt das Skript sowieso noch woanders):

   map ,kqs :%!perl -pe '$z=/^> *-- $/?1:/^[^>]/?0:$z; $_="" if $z;'

(Hey, sieht bald aus wie Geek-Code...)

An dieser Mail soeben getestet :). Übrig blieb:

> 
> mfG
> Eduard.


-- Niklas
------------------------------------------------
Um sich aus der Liste auszutragen schicken Sie
bitte eine E-Mail an majordomo@jfl.de die im Body
"unsubscribe debian-user-de <deine emailadresse>"
enthaelt.
Bei Problemen bitte eine Mail an: Jan.Otto@jfl.de
------------------------------------------------
Anzahl der eingetragenen Mitglieder:     742


Reply to: