if (/$beg/ .. (/$end/ || eof )) { ... }
if (/$beg/ .. (/$end/ || eof(INFILE) )) { ... }

##</code><code>##

if (/$beg/ .. (/$end/ || eof() )) { ... }