Re: using split on a file

[lolindrath]

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;

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

--=Lolindrath=--

[eg]

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!