Moin Tilo!
Tilo Schwarz schrieb am Sonntag, den 07. August 2005:
> >Viel zu lang, und langsamer als
> >
> >perl -ne 'print $_ if $seen{$_}; $seen{$_}=1' file1 file2
>
> BTW, meine bevorzugte Lösung ist sowieso
>
> sort file*.txt | uniq -c | grep " 5" | cut -c9-
>
> bei 5 Files.
Das kostet aber Speicher und die Laufzeit skaliert nicht gut. Und mit
UTF-8-Locale kannst du sort und grep eh vergessen.
Perl-Version:
perl -ne 'print $_ if ++$seen{$_} > $#ARGV' *.txt
... egal wie viele Dateien. Kann man noch mit einmaliger Berechnung der
Anzahl beschleunigen.
MfG,
Eduard.
--
** WARNING **: snd_pcm_pause() failed: Die Dateizugriffsnummer ist ein
schlechter Verfassung
--
Haeufig gestellte Fragen und Antworten (FAQ):
http://www.de.debian.org/debian-user-german-FAQ/
Zum AUSTRAGEN schicken Sie eine Mail an [EMAIL PROTECTED]
mit dem Subject "unsubscribe". Probleme? Mail an [EMAIL PROTECTED] (engl)
