Re: how to read multiple line from a file

[2teez]

Does this work for you?

use warnings;
use strict;
use feature 'say';

my $str = do {
    local $/;
    <DATA>;
};

say join " " => grep { $_ if /fox/ .. /over/ } split /\n/, $str;

__DATA__
the
quick
brown
fox
jumped
over
the
unfortunate
dog

Output
fox jumped over

NOTE:
I used Athanasius data since the OP has none.