Aprire un file di programma Perl . Inserire il cursore dove si desidera rimuovere gli spazi iniziali da una variabile 
 2 
 Digitare il seguente codice: 
 
my $ stringa = " La mia stringa con uno spazio iniziale " ; < . br
 stampa > $ stringa . " \\ n"; 
 
 $ stringa = ~ s /^ \\ s + //; 
 
 print $ stringa . " \\ n"; 
 
 La variabile in questo esempio ha uno spazio di primo piano prima del testo , ma il modello di funzione di corrispondenza nella terza linea sarebbe rimuovere tutti gli spazi iniziali , tra cui carattere di escape come " \\ t " per un scheda . La funzione si inizia con " s /" e chiama l' operatore di sostituzione . Il "^" indica di abbinare dall'inizio della stringa . Il "\\ s" indica di controllare gli spazi bianchi e il "+" gli dice di lasciare il resto della stringa intatto . 
 3 
 Salvare il file di programma Perl . 
 
 
              
Programmazione © www.354353.com