linux-l: perl frage

[Thomas Knop]

JSC wrote:
> ....
> wie erkenne ich aus perl, welches endian system drunterliegt ?
> 
> ich wuerde auch ein kl. c-prog aus perl aufrufen. habe sowas
> aber noch nie gemacht. hat jemand ein "hello world" beispiel ?

#define BIG_ENDIAN    (*((int *)"\x1\x2\x3\x4") == 0x01020304)
#define LITTLE_ENDIAN (!BIG_ENDIAN)
#define LEIDER_INTEL  LITTLE_ENDIAN

so gehts in c. zu perl kann ich da wenig sagen. du solltest aber vorher
unbedingt prüfen, ob du eine 16-bit, 32-bit oder 64-bit architektur vor
dir hast (128-bit?). auf einer SGI kann das was da oben steht ordentlich
in die hose gehen.

Gruß
  Thomas
> 
> bye
> Jens
> --
>  --------------------------------------------------------------
> | Jens Schlegel                                                |
> | TFH Berlin         email: schlegel at tfh-berlin.de             |
>  --------------------------------------------------------------


-- 
=======================================================================
ISV GmbH                                             Tel.: 030-53433408
Thomas Knop                                          Fax : 030-53433435
Am Treptower Park 75                                 t.knop at isv-gmbh.de
12 435 Berlin                                    http://www.isv-gmbh.de
=======================================================================