http://qs321.pair.com?node_id=153328


in reply to from $string to shining $string

The easiest way is to locally re-set your record separator. Normally this is set to newline, but you can set it to anything you like: 
my @quotes = ();
if( open(FILE,$myfile) ) {

    local $/ = '%';

    @quotes = <FILE>;
 
    close FILE;
}
else {
  print "oops, i need to check why the file didn't open...";
}

[download]

Replies are listed 'Best First'.
Re: Re: from $string to shining $string
by gellyfish (Monsignor) on Mar 21, 2002 at 14:59 UTC

    print "oops, i need to check why the file didn't open...";

    Of course if you had printed the value of $! you wouldn't need to check why ;-}

    /J\

[reply]

In Section Seekers of Perl Wisdom