Moves directories relatively to a new location

MoveDirectoriesRelatively.ps1

$directoriesToMove = 'Backup'
$newDirectory = 'C:\target\directory'

(Get-ChildItem -Recurse -Path $directoriesToMove -Directory) | foreach{
  $newPath = $($_.FullName.Replace("$PWD", $newDirectory));
  $newPath = $newPath.Substring(0, $newPath.LastIndexOf('\'));
  New-Item -Path $newPath -ItemType Directory | Out-Null;
  Move-Item -Path $_.FullName -Destination $newPath}