ru.perl

 
 - RU.PERL ----------------------------------------------------------------------
 From : Mikhail V Majorov                    2:461/43       18 Jun 2000  17:45:50
 To : All
 Subject : Re: check direxist
 -------------------------------------------------------------------------------- 
 

 
 > 
 > Paul Kulchenko <paulclinger@yahoo.com> wrote:
 > 
 > >>if [ ! -d $SOMEDIR]; then
 > >>   mkdir $SOMEDIR
 > >>fi
 > >>как это в перле изобразить или где почитать об этом?
 > 
 > PK> -d $SOMEDIR or mkdir $SOMEDIR, 0755 or die $!;
 > 
 > а если усложнить задачу. Hи шелл ни эта перловая конструкция
 > не создают больше чем один уровень каталога за раз, а мне,
 > желательно создать весь путь.
 > Разобрать сплитом весь путь и загнать -d в цикл или File::Path заюзать?
 
 ну еще вариант system "install -d $path"
 все чего нет будет создано.
 
 -- 
 
 С уважением, Михаил.
 
 --- FIDOGATE 4.3.5
  * Origin: KhNU FidoNet Node (2:461/43.0)
 
 

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