[Israel.pm] Renaming folder using perl

[Berler Chanan]

Hi All,

I need to write a script that renames the folder the script is running from:
The idea to rename the current folder to a back_<localtime>, then download a
zip file and extract it

(the main Idea to replace the current agent with another nagios agent).

Problem: how can I rename the current folder the script is running from ?
trying rename function fails (like system rename).

Thanks
Chanan