Создать (!!!) файл в Perl...

Подскажите, пожалуйста, как создать (не открыть !) файл в PERL'e ? Хочу переименовать один лог и начать новый, но недает... Права в директории, где пытаюсь создавать (командой open(file,"+<$filename")), установлены правильно...