[Date Prev][Date Next][Thread Prev][Thread Next]
[Search]
[Date Index]
[Thread Index]
Re: [MacPerl] Wow: G3/MacPerl performance
At 5:40 AM -0800 1997.12.25, Philippe Wiede wrote:
>########### PERLTEST.PL ###############
>open(OUTFILE, ">ptest.dat") || die "Can't open ptest.dat";
>print STDERR "Starting\n";
>$starttime = time;
>for ($i = 1; $i <= 100000; $i++) { print OUTFILE "$i\n"; }
>$stoptime = time;
>print STDERR ($stoptime - $starttime), " Seconds elapsed time\n";
>#######################################
This is probably not a good script to compare processor speed, because a good portion of time is spent writing to disk. (correct me if wrong)
There are probably better model on CPAN.
Xah, xah@best.com
http://www.best.com/~xah/Wallpaper_dir/c0_WallPaper.html
"I'm a programer, you're a programmer."
***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch