Re: Re: Auto linking to words in a text file

my $data;
{
   local $/;     #sets input list separator to undef
                 #so we can 'slurp' the file in
   $data = <TEXTFILE>;
}
close TEXTFILE;
[download]

Why didn't I think of that :)

These are the sort of things I love about such forums as Perl Monks.

Brother Marvell

Comment on Re: Re: Auto linking to words in a text file Download Code

Replies are listed 'Best First'.
Re: Re: Re: Auto linking to words in a text file by btrott (Parson) on Dec 01, 2000 at 23:31 UTC
If you like that then you'll probably like to know that it can be done w/ even less keystrokes: `my $data = do { local $/; <TEXTFILE> };` [download] No, this isn't golf, but all the same it's a nice construct to know.	[reply] [d/l]
Re: Re: Re: Re: Auto linking to words in a text file by japhy (Canon) on Dec 02, 2000 at 01:13 UTC
That has to copy the string though. Doing: `my $x = do { "string" };` [download] is less efficient than `my $x; { $x = "string" }` [download] `japhy` -- Perl and Regex Hacker	[reply] [d/l] [select]
Re: Re: Re: Re: Auto linking to words in a text file by turnstep (Parson) on Dec 02, 2000 at 05:16 UTC
Or even: `{ local $/=<TEXTFILE>; ## Do stuff with $/ directly }` [download]	[reply] [d/l]