Так как есть известная бага с 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)
- Форум problem with perl & sub (2006)
- Форум ChatGPT (2023)
- Форум проблемка с апгрейдом nginx (2007)
- Форум Perl + FastCGI + nginx (2009)
- Форум perl, IPC & socket - чего тут не так? (2006)
- Форум tar не обрабатывает файл с пробелами и без раширения (2015)
- Форум ufo ai кто ставил? (2006)
- Форум [gnupg, apt-move] Не подписывает Package (2010)
- Форум gem pg on rails (2015)