Eksempel
* Skriv alle linier med mindre vi har set linien
før:
perl -ne '$a{$_}++ or print' files...
- Brug while(<>){...} magi: perl -ne '...'
- Hvis $a{$_} er defineret ( >=1), så har vi set
linien før
- Ellers hvis ikke defineret, skriv linien ud: print