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