Para convertir una cadena a ASCII puedes usar la función ord():
Using perl Syntax Highlighting
my $string = "hola";
my @values = split //,$string;
for my $value (@values) {
my $ascii = ord($value);
print "$value\t$ascii\n";
}
Coloreado en 0.001 segundos, usando
GeSHi 1.0.8.4
nos da esto
Using text Syntax Highlighting
h 104
o 111
l 108
a 97
Coloreado en 0.000 segundos, usando
GeSHi 1.0.8.4
ord() convierte sólo el primer carácter de la cadena a ASCII, así que hay que separar cada cadena en sus caracteres individuales. Esto lo podemos hacer con split() y guardamos los valores en el array @values. Luego, podemos procesar cada valor con ord().