Select Code to Download

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

...
foo bar. baz biz.
deferred gross profit is blah blah blah. more
blah.  and yet more blah.  But not this blah.

if ($test =~ m{(?=deferred|unrealized)((?:.*?\.){3})}s) {