indietro

-i imposta il valore della variabile Perl $^I, che a sua volta influisce sul comportamento di <>; consultate perlrun per maggiori dettagli. Modificando direttamente le variabili appropriate, potete ottenere lo stesso comportamento all'interno di un grosso programma. Per esempio:

     # ...
     {
        local($^I, @ARGV) = ('.orig', glob("*.c"));
        while (<>) {
           if ($. == 1) {
               print "Questa linea dovrebbe apparire in cima ad ogni file\n";
           }
           s/\b(p)earl\b/${1}erl/i;        # Corretto un errore di battitura, mantiene le maiuscole/minuscole
           print;
           close ARGV if eof;              # Reimposta $.
        }
     }
     # $^I e @ARGV qua ritornano ai loro vecchi valori

Questo blocco modifica tutti i file .c nella directory corrente, lasciando una copia del dato originale da qualunque file in un nuovo file .c.orig.

vedi in inglese