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

[Anatoly A. Ivanov]

Здравствуйте, community.

Подскажите, пожалуйста, как правильно переместить файл с кривым именем
(содеражащий: пробелы, одинарные кавычки, скобки круглые и квадратные)
из perl cкрипта

Сейчас делаю:
$new_file=~ s/['\"]//g;
$new_file=~ s/\s/_/g;
system ('mv', $file, $dir);


вырезаю кавычки и пробелы, но как кажется, нужно просто граммотно
экранировать. Как это сделать - не знаю.

Помогите пожалуйста.