Так как есть известная бага с mv (и соответственно с rename в Perl) файлов м/у разными винчестерами, то хочется реальзовать перемещение через cp + rm Вот код: .... .... rename "$file1", "$file2" or do { logg ("Can't move file $file1 using rename : '$!'"); logg ("Trying move file $file1 with cp & rm ..."); `cp $file1 $file2`; if ( $@ ) { logg("Error while copying file $file1 : $@"); } else { `rm $file1`; logg("Can't remove file $file1 : $@") if $@; } } .... .... Правильно ли я обрабатываю ошибки?
Ответ на:
Re:Валидная работа cp и rm в Perl
от murla
Ответ на:
комментарий
от anonymous
Ответ на:
комментарий
от kri
Ответ на:
комментарий
от kri
Ответ на:
комментарий
от anonymous
Ответ на:
комментарий
от kri
Ответ на:
комментарий
от anonymous
Ответ на:
комментарий
от anonymous
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.
Похожие темы
- Форум Собрать файлы в одну директорию из # директории с поддериекториями (2016)
- Форум Решил освоить perl =) (2005)
- Форум Perl + FastCGI + nginx (2009)
- Форум google-app-engine-django, buildout и современный дистрибутив (2010)
- Форум perl, IPC & socket - чего тут не так? (2006)
- Форум ChatGPT (2023)
- Форум Как добавить мультипоточность (2012)
- Форум debian + зависимости (2007)
- Форум Непонятки [NAGIOS] и скрипт (2009)
- Форум 3g modem huawei e173eu-1 + perl script (2013)