Aprire un nuovo programma Perl . Inserire il cursore all'inizio del file
2
Digitare il seguente codice:
sub trim ( $ ) {
my $ stringa = shift; < . br>
$ stringa = ~ s /\\ s + $ //;
return $ stringa ;
}
Questa funzione crea un file temporaneo che assume il valore della stringa passato alla funzione . Poi usa una espressione regolare per rimuovere gli spazi finali . Il "\\ s" indica alla funzione di cercare solo per i caratteri di spazio e la " $ " dice di guardare solo alla fine della stringa . Dopo rimuovere gli spazi finali , la funzione restituisce la variabile al programma principale .
3
Salvare il file di programma .
Programmazione © www.354353.com