my $machine = 'ybslint01';
my $sharename1 = 'wwwdev';
my $sharename2 = 'wwwybs';
my $source = "\\\\$machine\\$sharename1\\streams\\$Config{'Author'}\\$Config{'Ref'}";
my $target = "\\\\$machine\\$sharename2\\ybsone\\pipeline\\master\\13Apr\\$Config{'Ref'}";
rename $source, $target
    or die "Couldn't move '$source' to '$target' : $!";