Skip site navigation (1)Skip section navigation (2)
Date:      Thu, 27 Mar 2003 00:27:32 +0200
From:      Giorgos Keramidas <keramida@ceid.upatras.gr>
To:        Kenzo <kenzo_chin@hotmail.com>
Cc:        freebsd-questions@freebsd.org
Subject:   Re: perl help
Message-ID:  <20030326222732.GC19762@gothmog.gr>
In-Reply-To: <DAV44DVRXGsNLqY54z30000b1d0@hotmail.com>
References:  <DAV44DVRXGsNLqY54z30000b1d0@hotmail.com>

next in thread | previous in thread | raw e-mail | index | archive | help
On 2003-03-26 14:18, Kenzo <kenzo_chin@hotmail.com> wrote:
> I don't know how to write anything in perl and will eventually learn it.
> but I was wondering if anyone would help write a quick perl script for me.
>
> Basically I want the script to look thru a file for certain words and cound
> how many times it finds the word that comes after.
> I have a log file that keeps track of E-mail attachments being send and
> received, and I want to be able to do a count of certain attachments.
> for example. say I see alot of "big this", "big that" and "big nothing"
> I want to be able to see how many times the word that comes after big
> appears in the log file.
> so the output would be like this.
> this    5
> that 10
> nothing 20

You don't need Perl for that.  Here's a small trick:

	grep 'this' file | wc -l
	grep 'that' file | wc -l
	...

- Giorgos



Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?20030326222732.GC19762>