[MacPerl] Is MacPerl 5.0.7r1m much slower than 4.1.8 or is it just me?

[sdouglass@armltd.co.uk (scott douglass)]

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