Так как есть известная бага с 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
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.
Похожие темы
- Форум Решил освоить perl =) (2005)
- Форум ChatGPT (2023)
- Форум tar не обрабатывает файл с пробелами и без раширения (2015)
- Форум google-app-engine-django, buildout и современный дистрибутив (2010)
- Форум Perl + FastCGI + nginx (2009)
- Форум Как добавить мультипоточность (2012)
- Форум debian + зависимости (2007)
- Форум mmap && PROT_EXEC (2007)
- Форум Установка Airtime (2014)
- Форум Gentoo, при загрузке инита не проверяется f2fs, как это починить? (2020)