in reply to Re: split at '- - -'
in thread split at '- - -'

undef isn't the only useful thing you can assign to $/...

use strict;
use Data::Dumper;

my @f;
{
    local $/ = "\n---\n";
    chomp(@f = <DATA>);
}

print Dumper(\@f);
exit;

__END__
line1
---
line2
---
line3
---

[download]
package Cow { use Moo; has name => (is => 'lazy', default => sub { 'Mooington' }) } say Cow->new->name

In Section Seekers of Perl Wisdom