Monday, July 18, 2011

Renaming a file

use File::Copy;

# Function Name : renameFile
# Input : Name of the Source file and destination file name
# Output : None
# Description : Renames source file to destination file name
# See my other blogs for FileExists function
sub renameFile()
{
my ($source, $destination) = @_;
FileExists($source);
rename($source,$destination);
}

No comments:

Post a Comment