On 2012-01-10 01:08, Rajeev Prasad wrote:
$string = a:b:1:2:0x00D70803:0x00FE3490; @myarr=split(/:/,$string);my $lpc= join "-", map ord, ( split //, pack "N", $myarr[4] )[ -3 .. -1 ]; this is throwing error: Argument "0x00D70803" isn't numeric in pack at ./pc.converter.pl line 11.
perl -wle 'printf "%x\n", oct "0x00D70803"' d70803 -- Ruud -- To unsubscribe, e-mail: beginners-unsubscr...@perl.org For additional commands, e-mail: beginners-h...@perl.org http://learn.perl.org/
