my $packed_number = pack( "N", 16909060 );
     print unpack("H8",$packed_number),"\n";