Написать два скрипта на Perl

Руслан19 лет в сервисе
Данные заказчика будут вам доступны после подачи заявки
16.11.2008

Нужно написать два скрипта на Perl.

Первый.

Из файла вида

UkRecoMFC/Korosten'/Ania/say00003.mfc

UkRecoMFC/Korosten'/Ania/say00004.mfc

....

UkRecoMFC/Korosten'/Slavik/say00201.mfc

UkRecoMFC/Korosten'/Slavik/say00202.mfc

берем пути к файлам и переписываем файлы, изменяя say0xxx на say0(xxx+Y), где Y = 400, например.

Второй.

Берем тектовый файл, ищем в нем все say0xxx и заменяем на say0(xxx+Y), где Y = 400, например.

Сделать нужно к сегодняшнему вечеру.

Заявки фрилансеров