Muy buena.
Estoy intentando pasar un numero de hexadecimal a decimal.
Estuve usando la función "hex", pero qué sorpresa cuando me dí cuenta que esto hace todo lo contrario, de decimal a hexadecimal.
Leí en el foro printf("%x", Valor), pero lo que necesito es guardar esto en una variable.
¿¿ Alguien sabe alguna ??
-
- Publicidad
Pasar de Hexadecimal a Decimal
4 mensajes
• Página 1 de 1
Pasar de Hexadecimal a Decimal
por javierg » 2007-12-11 04:49 @242
- javierg
- Perlero nuevo
- Mensajes: 48
- Registrado: 2006-10-17 05:26 @268
Publicidad
por explorer » 2007-12-11 07:07 @338
Pues no, javierg...
hex(), justamente, pasa de hexadecimal a decimal.
Lo que hace el printf que muestras, hace lo contrario: pasa de decimal a hexadecimal.
Si quieres guardar un valor formateado con printf, usa sprintf: $var = sprintf("%x", $valor);.
hex(), justamente, pasa de hexadecimal a decimal.
Lo que hace el printf que muestras, hace lo contrario: pasa de decimal a hexadecimal.
Si quieres guardar un valor formateado con printf, usa sprintf: $var = sprintf("%x", $valor);.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
-
explorer - Administrador
- Mensajes: 14486
- Registrado: 2005-07-24 18:12 @800
- Ubicación: Valladolid, España
por javierg » 2007-12-11 11:04 @503
Hola.
Me colé en lo que escribí; quería decir de decimal a hexadecimal.
Encontré en Internet una función que se llamaba snippet.pl, pero me parecía poco eficiente.
Así que al final hice algo parecido a lo tuyo:
Me colé en lo que escribí; quería decir de decimal a hexadecimal.
Encontré en Internet una función que se llamaba snippet.pl, pero me parecía poco eficiente.
Así que al final hice algo parecido a lo tuyo:
Using perl Syntax Highlighting
$Cadena=`snmpwalk -c $Comunity $PSAX atmAtmSpvcVpcStatsInCellCountLoA.$linea`;
$Cadena=~s/\s+/ /g;
$Valor = (split ":", $Cadena)[2];$Valor=$Valor+0;
print "el valor en decimal de inloa es $Valor\n";
$InLoA=sprintf("%X", $Valor);
print "el valor en hexadecimal de inloa es $InLoA
$Cadena=~s/\s+/ /g;
$Valor = (split ":", $Cadena)[2];$Valor=$Valor+0;
print "el valor en decimal de inloa es $Valor\n";
$InLoA=sprintf("%X", $Valor);
print "el valor en hexadecimal de inloa es $InLoA
Coloreado en 0.003 segundos, usando GeSHi 1.0.8.4
- javierg
- Perlero nuevo
- Mensajes: 48
- Registrado: 2006-10-17 05:26 @268
4 mensajes
• Página 1 de 1
¿Quién está conectado?
Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados