Re: using split on a file

Ok, this is what worked for me (adapted to your code a little). I was using CGI.pm and when I just undefined $/ it really screwed some stuff up.

my $OldNewLine = $/;
$/ = undef;
open( FILE, "file" );
my @List = split( /\n%{5}\n/, <FILE> );
close (FILE);
$/ = $OldNewLine;
[download]

Update: Ignore the above code look at the reply below this.

--=Lolindrath=--

Comment on Re: using split on a file Download Code

Replies are listed 'Best First'.
Re: Re: using split on a file by eg (Friar) on Jan 02, 2001 at 14:39 UTC
Or, you can use a block. It's neater. `my @List=(); { local $/ = undef; open( FILE, "file" ); @List = split( /\n%{5}\n/, <FILE> ); close (FILE); } # $/ is back to what it used to be!` [download]	[reply] [d/l]