in reply to copy and rename depending on location

use File::Spec::Functions; # i.e. catfile