ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Artem Chuprina                       2:5020/400     23 Sep 2002  15:48:02
 To : Smirnov Alexey
 Subject : Re: perl + rename backup files
 -------------------------------------------------------------------------------- 
 

 Здравствуй, Smirnov Alexey.
 
 SA> Есть сервер с линуксом. Hа нем запускается копирование рабочих баз:
 
 SA> /bin/cp -fpR --backup=numbered --update $WORKBASES $COPYDIR
 
 SA> соответсвенно в каталоге COPYDIR имею нумерованные копии файлов:
 
 SA> 1SBLOB.DBF
 SA> 1SBLOB.DBF.~1~
 SA> 1SBLOB.DBF.~2~
 SA> 1SBLOB.DBF.~3~
 SA> 1SBLOB.DBF.~4~
 SA> и т.д.
 
 SA> (более свежий файл имеет большее число ~X~ на конце)
 SA> Собственно проблема - мне надо иметь каждый день ровно три копии каждого
 SA> файла. Т.е. перед началом копирования мне надо во всех подкаталогах так
 SA> сдвинуть нумерацию этих файлов, чтобы последний файл стал
 SA> <*.~2~>, предпоследний <*.~1~> ну и более рание удалить (уточнение, раз
 SA> их три копии то надо <~1~> удалить, <~2~> => <~1~>, а <~3~> => <~2~> и
 SA> после этого смело копировать). Мне приятель посоветовал написать скрипт на 
 SA> перле. Пожалуйста посоветуйте как примерно это сделать.
 
 А man logrotate не помогает? Тогда напиши. Как? Hу просто, берешь и пишешь.
 perldoc -f readdir, perldoc -f rename.
 
 -- 
 Artem Chuprina
 Communiware.net
 RFC2822: <ran@ran.pp.ru>, FIDO: 2:5020/358.49, ICQ: 13038757
 --- ifmail v.2.15dev5
  * Origin: Leninsky 45 home network (2:5020/400)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    perl + rename backup files   Smirnov Alexey   21 Sep 2002 16:58:17   Re: perl + rename backup files   Artem Chuprina   23 Sep 2002 15:48:02