• Publicidad

Pasar de Hexadecimal a Decimal

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Pasar de Hexadecimal a Decimal

Notapor javierg » 2007-12-11 04:49 @242

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 ??
javierg
Perlero nuevo
Perlero nuevo
 
Mensajes: 48
Registrado: 2006-10-17 05:26 @268

Publicidad

Notapor 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);.
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Notapor 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:

Sintáxis: [ Descargar ] [ Ocultar ]
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
Coloreado en 0.002 segundos, usando GeSHi 1.0.8.4
javierg
Perlero nuevo
Perlero nuevo
 
Mensajes: 48
Registrado: 2006-10-17 05:26 @268

Notapor Jenda » 2007-12-23 09:45 @447

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
printf "el valor en hexadecimal de inloa es %X\n", $Valor;
Coloreado en 0.001 segundos, usando GeSHi 1.0.8.4
Jenda
Perlero nuevo
Perlero nuevo
 
Mensajes: 132
Registrado: 2007-10-29 06:31 @313
Ubicación: Praga, Republica Checa


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 27 invitados

cron