>########### 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 file will create a new file (ptest.dat) of about 600K containing >the numbers from 1 to 100000. >Here are some benchmarks I have run: > >Machine Elapsed Comment >Pentium 12 Sec Linux >SPARC IPC 68 seconds (with other processes running) >SPARC 2 37 seconds (with other processes running) >SPARC Ultra 3 seconds 140 Mhz UltraSPARC > >Pentium 60 19 seconds DOS 6.2 >Pentium 90 15 seconds DOS 6.2 >386/25 287 seconds DOS 6.2 <grin> >486/66 22 seconds Win 95 >Pent Pro/200 6 seconds Win 95 > >Mac IIci 180 seconds 68030 @ 16 Mhz >Quadra 800 80 Seconds 68040 @ 33 Mhz >Mac 8500/150 18 Seconds (MacPERL installed for PowerPC) **PM G3/233 1 Second (MacPerl 5.1.4r4, MacOS8, 96Mb)** As an addendum to previous performance postings I couldn't resist to share the results of the new G3/MacPerl Duo with you: it's blinding fast :) Happy New Year to all, Philippe Wiede mailto:pwiede@virtuoso-net.com ............................................................................. Join Virtuoso-Net (r), the global contract network for communication and programming professionals: http://www.virtuoso-net.com/openings.html ............................................................................. ***** Want to unsubscribe from this list? ***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch