[Date Prev][Date Next][Thread Prev][Thread Next] [Search] [Date Index] [Thread Index]

Re: [MacPerl] Is MacPerl 5.0.7r1m much slower than 4.1.8 or is it justme?



>Hello,
>
>I was trying out the MPW tool version of MacPerl 5.0.7r1m and it seems much
>slower than 4.1.8.  For example:
>
>Date -n
>perl5.0.7r1m -e 'while (<>) { ++$includes{$1} if /^\s*#\s*include\s+(\S+)/
>} foreach $k (keys %includes) { print $k, "\t", $includes{$k}, "\n"; }'
>"{{CIncludes}}"Å
>Date -n
>
>['Å' is option-X]
>
>This takes about 30 seconds with MacPerl 4.1.8 on my PowerMac 8100/80.
>With 5.0.7r1m I waited a few minutes before I gave up and interrupted it.
>I'm using MPW Shell version 3.4.2b1c3 (which is probably later than ETO 19,
>sorry).
>
>I did just one file and 5.0.7r1m and got the right answer.  I checked that
>5.0.7r1m has a 'cfrg' resource and a big data fork, so it does seem to be a
>PPC native tool.  On longer runs, I was even able to drop into MacsBug and
>see native perl code.  Then I did some manual PC-sampling while perl was
>running.  Unexpectedly I was always in MacX even though it wasn't doing
>anything (not even any windows open).  After quitting MacX and all the
>other apps except the Finder 5.0.7r1m got much faster about the same as
>4.1.8.  Is the 5.0.7r1m MPW tool yielding way, way too frequently?
>
>                 --scott

Hello,
      I was trying to persuade a colleague to move to Perl 5. I tend to use Perl
under Unix, and on a Mac I use MacPerl. He uses MPW, and had said that he had
noticed Perl5 to be substantially slower (running on a Quadra 650). I have not 
noticed performance degradation using the MacPerl application (on a
Performa 475). My colleague did some empirical tests. On a unix box, he
found that Perl5
was approx. 20% faster than Perl4. I sat next to him while he ran tests under
MPW. A program that took 5 seconds to run with MPW Perl4.1.8 had not completed
after 50 seconds using MPW Perl 5.0.7. I wasn't able to persuade him to change!!

Bob

________________________________________________________________
          Bob Wilkinson, Perl Programmer, Pindar plc
Tel: +44 (0)1904 613040    Email: B.Wilkinson@pindar.co.uk
Fax: +44 (0)1904 613110    URL: http://www.connection.co.uk/~bob
________________________________________________________________
    The views expressed herein are mine, and are not 
          necessarily shared by my employer.
________________________________________________________________