From owner-freebsd-questions  Thu Jan 31 19:26:38 2002
Delivered-To: freebsd-questions@freebsd.org
Received: from laime.cs.uchicago.edu (laime.cs.uchicago.edu [128.135.11.244])
	by hub.freebsd.org (Postfix) with ESMTP id 216CA37B402
	for <freebsd-questions@freebsd.org>; Thu, 31 Jan 2002 19:26:36 -0800 (PST)
Received: from abyss.cs.uchicago.edu (postfix@abyss.cs.uchicago.edu [128.135.11.27])
	by laime.cs.uchicago.edu (8.10.2/8.9.3) with ESMTP id g113QZs11898
	for <freebsd-questions@freebsd.org>; Thu, 31 Jan 2002 21:26:35 -0600 (CST)
Received: by abyss.cs.uchicago.edu (Postfix, from userid 10561)
	id 3294F5AA1E; Thu, 31 Jan 2002 21:26:35 -0600 (CST)
Date: Thu, 31 Jan 2002 21:26:35 -0600
From: Steven A <salyari@cs.uchicago.edu>
To: freebsd-questions@freebsd.org
Subject: PERL way too slow on cat operation; me wonders what is going on
Message-ID: <20020131212634.A13452@abyss.cs.uchicago.edu>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline
User-Agent: Mutt/1.2.5i
Sender: owner-freebsd-questions@FreeBSD.ORG
Precedence: bulk
List-ID: <freebsd-questions.FreeBSD.ORG>
List-Archive: <http://docs.freebsd.org/mail/> (Web Archive)
List-Help: <mailto:majordomo@FreeBSD.ORG?subject=help> (List Instructions)
List-Subscribe: <mailto:majordomo@FreeBSD.ORG?subject=subscribe%20freebsd-questions>
List-Unsubscribe: <mailto:majordomo@FreeBSD.ORG?subject=unsubscribe%20freebsd-questions>
X-Loop: FreeBSD.ORG

hi,

first of all, my uname -a: FreeBSD oberon.cs.uchicago.edu 4.4-RELEASE FreeBSD 4.4-RELEASE #0: Tue Sep 18 11:57:08 PDT 2001     murray@builder.FreeBSD.org:/usr/src/sys/compile/GENERIC  i386


now:

the following perl script takes 8 minutes to execute on both of my freebsd systems (two AMD K6-2 300s):

cat 80megfile.ps > perl cat.pl > output.ps

cat.pl:
while($_ = <STDIN>) {
        print $_;
}


however,

cat 80megfile.ps > cat - > output.ps

takes 2 seconds on the same system.


running that perl script on a debian system takes a few seconds also as does the cat -.


what the hell is going on?  perl seems to work reasonably other than this. 

my perl version: This is perl, version 5.005_03 built for i386-freebsd

this is the perl that came with a cd install of my freebsd system which i downloaded off the freebsd.org web site as an iso.


yours,
steve

To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-questions" in the body of the message