Interested to Buy Any Domain ? << Click Here >> for more details...
Packing and Unpacking.
Hi, I want to get output as 0x23400000345....
in the below example
How to get?
i tried out, but unable to get the answer
$r=0x234;
$t=0x345;
$y=pack('L L',$t,$r);
$x1=unpack('L!',pack('P',$y));
printf("\nThe value is $x1");
I didn't get constant output
- 1 Answers
- 3749 Views
- I also Faced
- E-Mail Answers
Answer / kiruthikau
use the following code.
<code>
use bigint;
my $r = 0x234;
my $t = 0x345;
my $x1 = $r << 32 | $t;
print $x1->as_hex;
</code>
| Is This Answer Correct ? | 2 Yes | 0 No |
Explain about typeglobs?
What does last statement do in perl?
How can you replace the characters from a string and save the number of replacements?
what is the procedure to define a user define module in your perl application?
How would you replace a char in string and how do you store the number of replacements?
Try pattern matching for the following: 1) 10.111.23.11 2) /root/abc/cde/fgg/ac.xml --> Get file name without extention. 3) /root/abc/ac.xml/fgg/ac.xml --> Get file name without extention. 4) What does "DIE" meant in PERL? 5) chomp 6) "This is saturday" --> Print the weekday number. 7) 11-2-2009 --> Print the name of the month. 8) Reverse the string without using func in C.
What is -> symbol in perl?
What can be done for efficient parameter passing in perl?
How to sort arrays in perl?
Why should I use the -w argument with my Perl programs?
What is the use of –w?
What is perl dbi?
ASP 
