Perl ha due funzioni per aiutarvi a capitalizzare caratteri di una stringa . La funzione " ucfirst " maiuscolo solo il primo carattere di una stringa , mentre la funzione " uc " capitalizza ogni personaggio . Questa funzione è utile quando si desidera confrontare due o più stringhe , senza preoccuparsi di caso . Trasformare una stringa in caso titolo è molto più difficile come Perl non ha una funzione di stringa prontamente disponibile a farlo. Tuttavia, è possibile utilizzare l'operatore "s" per trovare i primi caratteri di ogni parola in una stringa e poi capitalizzare loro. Istruzioni
1
Aprire il file di programma Perl . Inserire il cursore dove si vuole capitalizzare una stringa . Digitare il seguente codice :
$ stringa = " . Contenuto del mio stringa" ;
$ stringa = ucfirst ( $ stringa ) ; print $ stringa
;
< p > Questo crea una variabile stringa costituita da lettere minuscole del tutto . E poi chiama la funzione ucfirst di capitalizzare il primo carattere della stringa . Il risultato della dichiarazione di stampa è " contenuto di mia stringa ".
2
Digitare il seguente codice:
$ stringa = " contenuto del mio stringa . " ;
$ stringa = uc ( $ stringa ) ; print $ stringa
;
Questo reimposta la variabile stringa . Poi , la stringa chiama la funzione uc di capitalizzare ogni carattere della stringa . Il risultato della dichiarazione di stampa è " contenuto del mio STRING ".
3
Digitare il seguente codice:
$ stringa = " contenuto del mio stringa . " ;
$ stringa = ~ s /( [ \\ w '] + ) /\\ u \\ L $ 1 /g ; print $ stringa
;
po' complicato di codice utilizza il " s operatore ///" , che sostituisce occorrenze forniti dalla prima espressione con il secondo . In questo caso , viene eseguito attraverso la stringa di trovare il primo carattere di ogni parola . Normalmente, il carattere dopo l'apostrofo sarebbe considerato una parola nuova , ma la prima espressione indica all'operatore di ignorare apostrofi . Una volta che trova quei caratteri specificati , li capitalizza . Il risultato della dichiarazione di stampa è " contenuto del mio String ".
4
Salvare il file del programma Perl ed eseguirlo nella versione di Perl .