Help for this page

Select Code to Download


  1. or download this
    my $bytes = pack 'C*', 0x00, 0x00, 0x01, 0x16, 0x7A, 0x53, 0x7C, 0x80;
  2. or download this
    print unpack 'Q', scalar reverse $bytes;;
1196053200000
  3. or download this
    print unpack 'Q', pack 'C8',  reverse 0x00, 0x00, 0x01, 0x16, 0x7A, 0x
+53, 0x7C, 0x80;;
1196053200000
  4. or download this
    print unpack 'Q>', pack 'C8',  0x00, 0x00, 0x01, 0x16, 0x7A, 0x53, 0x7
+C, 0x80;;
1196053200000
  5. or download this
    ( $hi, $lo ) = unpack 'NN', $bytes;;
print +($hi * 2**32 ) + $lo;;
1196053200000