<prompt> Imeandikwa kwa Perl ambayo inatafuta faili ya maandishi jina la faili iliyoainishwa na mtumiaji kwa neno au kifungu maalum iliyoainishwa pia na mtumiaji na kuhesabu matukio, kuchapisha hesabu ya jumla kwa terminal, hati inapaswa kuwa kesi-insensitive na kuweza kushughulikia usemi wa regex kama maneno ya utafutaji, kwa kuongezea, hati inapaswa kutoa nambari ya mstari ambayo neno la utafutaji linapatikana na muktadha wa maandishi yanayozunguka iliyoainishwa na idadi ya herufi iliyoainishwa na mtumiaji pande zote mbili za neno la utafutaji.  <response>: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: Nambari ya utafutaji: 