[Comm] Re: Как переместить файл с кривым именем через perl

[Alexey Tourbin]

On Tue, Dec 14, 2004 at 12:14:00PM +0300, Maxim Bodyansky wrote:
> > Сейчас делаю:
> > $new_file=~ s/['\"]//g;
> > $new_file=~ s/\s/_/g;
> > system ('mv', $file, $dir);
> > 
> > вырезаю кавычки и пробелы, но как кажется, нужно просто граммотно
> > экранировать. Как это сделать - не знаю.
> 
> может быть имеет смысл использовать перловую ф-цию rename вместо
> вызова mv? Посмотрите perldoc -f rename

А также File::Copy::move() -- rename может не работать при перемещении
между фаловыми системами, хотя в данном случае этого не требуется.
----------- следущая часть -----------
Было удалено вложение не в текстовом формате...
Имя     : отсутствует
Тип     : application/pgp-signature
Размер  : 189 байтов
Описание: отсутствует
Url     : http://lists.altlinux.ru/pipermail/community/attachments/20041215/6065cbd5/attachment-0001.bin