Différences

Ci-dessous, les différences entre deux révisions de la page.

--- tech:perl_one-liners [2025/05/15 10:19] – Jean-Baptiste
+++ tech:perl_one-liners [2026/06/07 19:12] (Version actuelle) – modification externe 127.0.0.1
@@ Ligne 1: / Ligne 1: @@
+<!DOCTYPE markdown>
+{{tag>Brouillon Perl Programmation Encodage}}
+# Perl one-liners
+## Supprimer tous les caractères non-imprimables (sauf les \n)
+~~~bash
+perl -lpe 's/[[:^print:]]+//g' fichier.txt
+~~~
+## Enlever toutes les lignes en double (doublon)
+~~~bash
+perl -ne 'print unless $a{$_}++' fichier.txt
+~~~
+## Afficher les lignes en double préfixés par leur numéro de ligne
+~~~bash
+perl -ne 'print "$. $_" if $a{$_}++' fichier.txt
+~~~