/ / Manipulando String SVPs Perl em C - c, string, perl

Manipulando String Perl SVs em C - c, string, perl

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 № 1

O 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.