From mike@boobaz.net Mon Dec  4 12:15:54 2000
Received: from mxu4.u.washington.edu (mxu4.u.washington.edu [140.142.33.8])
	by lists.u.washington.edu (8.9.3+UW00.05/8.9.3+UW99.09) with ESMTP id MAA141308
	for <linux@lists.u.washington.edu>; Mon, 4 Dec 2000 12:15:53 -0800
Received: from boobaz.net (c1056043-a.sttln1.wa.home.com [24.19.193.36])
	by mxu4.u.washington.edu (8.9.3+UW00.02/8.9.3+UW99.09) with ESMTP id MAA10788
	for <linux@u.washington.edu>; Mon, 4 Dec 2000 12:15:52 -0800
Received: from c1056043-a (c1056043-a [24.19.193.36])
	by boobaz.net (8.9.3/8.9.3) with ESMTP id MAA30256
	for <linux@u.washington.edu>; Mon, 4 Dec 2000 12:15:52 -0800
Date: Mon, 4 Dec 2000 12:15:52 -0800 (PST)
From: Mike <mike@boobaz.net>
X-Sender: mike@c1056043-a.sttln1.wa.home.com
To: UW Linux Group <linux@u.washington.edu>
Subject: Re: parsing data w/perl
In-Reply-To: <Pine.A41.4.21.0012041150310.50792-100000@dante13.u.washington.edu>
Message-ID: <Pine.LNX.4.21.0012041200220.29933-100000@c1056043-a.sttln1.wa.home.com>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

Well, what else do you need besides something like:

# change the record separator from newline (\n) to space ( ).
$/ = " ";
my $incr = 0;
my @words = ();
open (F, "< $file");
while ($words[$incr] = <F>) {
	$words[$incr] =~ s/\n//g;
	$incr++;
}
close (F);

---------------------------
-=<(| mike@boobaz.net |)>=-

On Mon, 4 Dec 2000 at 11:51, Greg Daly wrote:

|hey guys,
|i'm wondering if anyone knows any resources that show tips/tricks to
|parsing large data (ASCII text, space-delimited) files with perl.
|I'd appreciate it a lot.
|thanks,
|-greg
|
|
|

.