in reply to Matching across multiple lines

Try this:
my $file = '/path/to/file.txt';

open (FILE,"<$file") || die $!;
read FILE, my $text, -s $file;
close(FILE);

print $1 if ($text =~ / Start(.*?) End/s);

[download]

Replies are listed 'Best First'.
Re^2: Matching across multiple lines
by Anonymous Monk on Jul 20, 2005 at 08:45 UTC
    Thanks for all your replys, people

    Problem solved!

    S D

[reply]

In Section Seekers of Perl Wisdom