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

[Maxim Bodyansky]

"Anatoly A. Ivanov" <anatol на fxp.ru> writes:

> Здравствуйте, community.
> 
> Подскажите, пожалуйста, как правильно переместить файл с кривым именем
> (содеражащий: пробелы, одинарные кавычки, скобки круглые и квадратные)
> из perl cкрипта
> 
> Сейчас делаю:
> $new_file=~ s/['\"]//g;
> $new_file=~ s/\s/_/g;
> system ('mv', $file, $dir);
> 
> 
> вырезаю кавычки и пробелы, но как кажется, нужно просто граммотно
> экранировать. Как это сделать - не знаю.

может быть имеет смысл использовать перловую ф-цию rename вместо
вызова mv? Посмотрите perldoc -f rename