Re: Word Occurrences

["L. S. Russell" <leslier@xxxxxxxxxx>]

I agree, perl is the best tool for that job, but how do you interface it
with rpg? I have played with perl on the 400 but I mostly use it on my
web server and have never had to pass data between rpg or cl and perl
scripts.

boldt@ca.ibm.com wrote:
> 
> Mark wrote:
> >Before I start to reinvent the wheel, does anyone have a
> >routine/program/module that would build a file/list of word occurrences.
> >Basically we have a free from 60 byte "Customer Comment" field that I
> would
> >like to read through and come up with a word occurrence list:  i.e.
> >
> >Word               Occurrences in File
> >great         112
> >good               100
> >service        88
> >Bad            76
> >etc., etc.
> 
> I know RPG fans will hate me for saying this, but this
> looks like an ideal application for Perl.  About a dozen
> lines of Perl code should do it.  A Google search on
> "word count Perl" came up with this web page:
> <http://www.stonehenge.com/merlyn/UnixReview/col02.html>
> which discusses counting words in a file (among other
> things).
> 
> Cheers!  Hans
> 
> Hans Boldt, ILE RPG Development, IBM Toronto Lab, boldt@ca.ibm.com
> 
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---

--
L. S. Russell Programmer/Analyst
Datrek Professional Bags, Inc.
2413 Industrial Drive
Springfield, TN. 37172
mailto:leslier@datrek.com
http://www.datrek.com
--
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---