Atualmente, estou tentando fazer algumas manipulações baseadas em strings em uma tentativa de acelerar uma seção do código Perl tradicional. O código Perl original parece
my $value = "abCdE";
my $uc_value = uc($value);
Eu olhei para a API Perl guts e parece que eu posso conseguir isso usando toUPPER()
mas isso funciona em um único caractere de cada vez. Eu pareço estar faltando como você pode percorrer a matriz de caracteres de apoio, colocando em maiúscula cada letra e, em seguida, atribuindo-a a um novo SV.
Qualquer ajuda é muito apreciada.
Respostas:
2 para resposta № 1O Perl não fornece muitas funcionalidades para extensões no nível C, mas o uppercasing é aparentemente um desses recursos. Na melhor das hipóteses, você pode ver como o núcleo implementa isso, mas realmente não é tão bonito assim.