in reply to move files without blowing out directories

Sounds good. Try move: 
use File::Copy;
move("/dev1/fileA","/dev2/fileB");

[download]

Update: Added link . . .
. . . I got yelled at. :)

In Section Seekers of Perl Wisdom