Удаление каталогов по средствам perl
Вот код:
--------------------------------------------------
$name=$ARGV[0];
$cmd="cmd \/C rmdir \/S \/Q C:\\Documents and Settings\\".$name."\\Application Data\\X-Chat 2\\xchatlogs";
exec($cmd);
-------------------------------------------------
Код верный, скрипт запускаю так:
namescript.pl username
где username имя пользователя, чтобы путь был найден.Но при исполнении этого скрипта происходит ошибка: Не удаётся найти указанный файл. Я вообще не понимаю в чём дело, я принтил результат в консоль, путь выдаёт верный!И что самое интересное на коротких путях он работает, т.е вот например отсюда удаляет: C://11/1 может удалить папку.В чём дело ?Или может можно как-то по другому по средствам перла удалить папку (с содержимым) ?
--------------------------------------------------
$name=$ARGV[0];
$cmd="cmd \/C rmdir \/S \/Q C:\\Documents and Settings\\".$name."\\Application Data\\X-Chat 2\\xchatlogs";
exec($cmd);
-------------------------------------------------
Код верный, скрипт запускаю так:
namescript.pl username
где username имя пользователя, чтобы путь был найден.Но при исполнении этого скрипта происходит ошибка: Не удаётся найти указанный файл. Я вообще не понимаю в чём дело, я принтил результат в консоль, путь выдаёт верный!И что самое интересное на коротких путях он работает, т.е вот например отсюда удаляет: C://11/1 может удалить папку.В чём дело ?Или может можно как-то по другому по средствам перла удалить папку (с содержимым) ?