如何在沒有uc（）函數的情況下將字母轉換爲UpperCase？

Question

我正在嘗試編寫一個腳本，它將所有字母從小寫轉換爲大寫，而不使用uc()函數。

Answer 1

您可以使用類似$str =~ tr/a-z/A-Z/，但uc可能是對Unicode的支持更好，如果對你很重要。

Answer 2

使用正則表達式：

$str =~ s/(.)/\u$1/g;