From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.emacs.gnus.general/11973
Path: main.gmane.org!not-for-mail
From: Lars Balker Rasmussen <lbr@mjolner.dk>
Newsgroups: gmane.emacs.gnus.general
Subject: Re: opening speed for nnml groups
Date: 04 Sep 1997 17:39:08 +0200
Message-ID: <0f90xdozqb.fsf@odin.mjolner.dk>
References: <whbu2bq604.fsf@norne.troll.no> <m0x6F7g-0005kWC@wandle.dra.hmg.gb> <0f4t82zbjt.fsf@odin.mjolner.dk> <52afhti0xm.fsf@sean.ebone.net>
NNTP-Posting-Host: coloc-standby.netfonds.no
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
X-Trace: main.gmane.org 1035151594 1159 80.91.224.250 (20 Oct 2002 22:06:34 GMT)
X-Complaints-To: usenet@main.gmane.org
NNTP-Posting-Date: Sun, 20 Oct 2002 22:06:34 +0000 (UTC)
Return-Path: <ding-request@ifi.uio.no>
Original-Received: from xemacs.org (xemacs.cs.uiuc.edu [128.174.252.16])
	by altair.xemacs.org (8.8.7/8.8.7) with ESMTP id JAA20412
	for <steve@altair.xemacs.org>; Thu, 4 Sep 1997 09:54:14 -0700
Original-Received: from ifi.uio.no (0@ifi.uio.no [129.240.64.2])
	by xemacs.org (8.8.5/8.8.5) with SMTP id LAA05738
	for <steve@xemacs.org>; Thu, 4 Sep 1997 11:50:05 -0500 (CDT)
Original-Received: from claymore.vcinet.com (claymore.vcinet.com [208.205.12.23]) by ifi.uio.no with SMTP (8.6.11/ifi2.4) 
	id <RAA02995@ifi.uio.no> for <ding@ifi.uio.no> ; Thu, 4 Sep 1997 17:39:14 +0200
Original-Received: (qmail 9116 invoked by uid 504); 4 Sep 1997 15:39:12 -0000
Original-Received: (qmail 9113 invoked from network); 4 Sep 1997 15:39:12 -0000
Original-Received: from odin.mjolner.dk (130.225.8.219)
  by claymore.vcinet.com with SMTP; 4 Sep 1997 15:39:11 -0000
Original-Received: (from lbr@localhost) by odin.mjolner.dk (8.7.6/8.7.3) id RAA26196; Thu, 4 Sep 1997 17:39:09 +0200 (MET DST)
Original-To: ding@gnus.org
In-Reply-To: Sean Doran's message of "04 Sep 1997 16:55:01 +0200"
Original-Lines: 27
X-Mailer: Gnus v5.4.65/Emacs 19.34
Xref: main.gmane.org gmane.emacs.gnus.general:11973
X-Report-Spam: http://spam.gmane.org/gmane.emacs.gnus.general:11973

Sean Doran <smd@ebone.net> writes:
> Ich, perl is a pig.  This makes me feel good about my
> choice for a scripting shell:
[...]
> > (run (time scsh -c 
> 	"(let loop ((i 1))
> 		(close-output-port 
> 		 (open-output-file (string-append \"test/\"
> 				    (number->string i))))
> 		(if (< i 10001) 
> 		    (loop (+ i 1))))"))
>       175.68 real         6.71 user        68.59 sys
> > (run (time perl -e "foreach $a (1..10000) { open FOO, \">test/$a\" }"))
>       198.90 real	  5.81 user	   68.99 sys

Not quite fair, as perl constructs the 1..10000 list in my orignal code
snippet.  Try this instead:

(run (time perl -e "while ($i++ < 10000) { open FOO, \">test/$i\" }"))

BTW, thank you for all the "My Pentium is faster than your Ultra" mails :-)

ObGnus: Are anyone able to (e)dit an nnml message without surprising
	results?
-- 
Lars Balker Rasmussen, Software Engineer, Mjolner Informatics ApS
lbr@mjolner.dk