アップロードに関して、もう一件質問させてください。

アップロードしたファイルの名前を変更したいのですが、

print(OUT $file);
rename("$filename", "123456.xls");
close($filename);
close(OUT);

と、したのですが、これでは駄目なのでしょうか？
試してみたところ、上手くいきませんでした。