Path: utzoo!attcan!uunet!mcsun!ukc!harrier.ukc.ac.uk!jn From: jn@ukc.ac.uk (J.Nash) Newsgroups: comp.lang.perl Subject: Re: perl on DECstation Message-ID: <4849@harrier.ukc.ac.uk> Date: 3 Jun 90 23:21:49 GMT References: <22435@dartvax.Dartmouth.EDU> Reply-To: jn@ukc.ac.uk (J.Nash) Distribution: comp Organization: Computing Lab, University of Kent at Canterbury, UK. Lines: 20 In article bogaart@serc.serc.nl (Eugene &) writes: $op.sort 1. Below the test, what it does is not sorting, it leaves it $in the original state. $ $ @harry = ('dog','cat','x','Cain','Abel'); $ $ $x = join('', sort @harry); $ print ($x eq 'AbelCaincatdogx' ? "ok 1\n" : "not ok 1\n"); $ $Am I completely lost ? Does any one had this problem before? Is Yeah, I got this out of our DECstations. I found that the memcmp() routine was screwed and produced silly results. A quick fix for this is to edit the config.sh file when Configure prompts you, and undef the memcmp line. Perl then builds and passes all the tests. Hope this helps. Jarod