On 24 Feb 2003 at 10:02, Simon Wistow wrote: > use Config; > > if ($Config{'byteorder' == 1234) { > return $LITTLE_ENDIAN; > } elsif ($Config{'byteorder' == 4321) { > return $BIG_ENDIAN; > } else { > carp "Unsupported architecture (probably a Cray or weird > order)\n"; > }
On newer Perls you get 12345678 or 87654321 if you build with use64bitint IIRC. Cheers, Philip -- Philip Newton <[EMAIL PROTECTED]>