Re: [MacPerl] Search::Dict?

[Chris Nandor <pudge@pobox.com>]

At 16.55 -0500 1999.02.11, Richard Gordon wrote:

>Thus, I am stuck and have pasted the script below. Thanks for any help.
>

No -w?

># Use or Require statements:
>use Search::Dict;
>use DB_File;
>use Fcntl;
>######
># Declare variables:
>$dict = 1;
>$fold = 0;
>$key = "Rachel";
>$file = "Poindexter:www.sbl-site.org:home:sbl-home:EPubs:d:a.html";
>######
># Begin program:
>open(F, "<$file");
                  or die $!

>if (look <F>, $key, $dict, $fold)  {
          *F

I didn't look at the rest.  Try that, and see if it works.

<F> means "return one (in scalar context) or all (in list context) of the
lines from filehandle F".  You want to pass *F, as the docs say.

Hope this helps,

--
Chris Nandor          mailto:pudge@pobox.com         http://pudge.net/
%PGPKey = ('B76E72AD', [1024, '0824090B CE73CA10  1FF77F13 8180B6B6'])

***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch