- If exist в Perl,
 SubGun, 17:37 , 27-Июл-06 (1)Так?if (!exist($dir)) {mkdir("$dir", 0755) || die "Cannot create directory!"};
- If exist в Perl, NuINu, 17:42 , 27-Июл-06 (2)
>Так?
>
>if (!exist($dir)) {mkdir("$dir", 0755) || die "Cannot create directory!"}; И что работает? попробуй два раза запустить.
- If exist в Perl, SubGun, 17:52 , 27-Июл-06 (3)
>>Так?
>>
>>if (!exist($dir)) {mkdir("$dir", 0755) || die "Cannot create directory!"};
>
>И что работает? попробуй два раза запустить. Не могу. У меня эта хрень инициирует запрос к огромной базе.
Так что в этом не так? Подскажите.
- If exist в Perl, sly, 18:00 , 27-Июл-06 (4)
>>>Так?
>>>
>>>if (!exist($dir)) {mkdir("$dir", 0755) || die "Cannot create directory!"};
>>
>>И что работает? попробуй два раза запустить.
>
>Не могу. У меня эта хрень инициирует запрос к огромной базе.
>Так что в этом не так? Подскажите.
# perldoc perlfunc
if ( ! -e "$dir" )
{
mkdir "$dir", 0755 or die "Can't create $dir: $!\n";
}
|
Версия для распечатки
If exist в Perl, 
