[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 может не работать при перемещении
между фаловыми системами, хотя в данном случае этого не требуется.
----------- следующая часть -----------
Было удалено вложение не в текстовом формате...
Имя     : =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Тип     : application/pgp-signature
Размер  : 189 байтов
Описание: =?iso-8859-1?q?=CF=D4=D3=D5=D4=D3=D4=D7=D5=C5=D4?=
Url     : <http://lists.altlinux.org/pipermail/community/attachments/20041215/6065cbd5/attachment-0003.bin>