Numerare un file di testo

Supponiamo di avere un file di testo (prova.txt) che vogliamo numerare. Possiamo utilizzare:

perl -pe '$_ = "$. $_"' prova.txt

Se si vuole simulare l'output di cat -n prova.txt basta usare:

perl -ne 'printf "% 5d %s", $., $_' prova.tx

Per togliere la numerazione possiamo utilizzare:

perl -pe 's/^\s*\d+\s*//' prova.txt