$ STRING = uc ($ STRING);
Perl's uc () La función toma una cadena, pone todo en mayúscula y luego devuelve la nueva cadena.
$ myWord = 'palabra'; $ myUpperWord = uc ($ myWord);
primero, $ myWord se establece en un valor de 'palabra', entonces el uc () la función se ejecuta en $ myWord. los uc () la función toma toda la cadena $ myWord y lo convierte a su equivalente en mayúsculas. El valor de $ myUpperWord es entonces igual a 'PALABRA.'