DeDup-iTunes.ps1

DeDup-iTunes.ps1

<#
.SYNOPSIS
Finds duplicate iTunes tracks, and if the -Delete parameter is specified, deletes them.
.PARAMETER Delete 
Delete duplicate tracks
#>

[CmdletBinding()]
param(
  [switch] $Delete
)

$itunes = New-Object -com itunes.application
$tracks=$itunes.LibraryPlaylist.Tracks
$seen = @{}
foreach ($track in $tracks) {
  if (-not $track.Location) {
    continue
  }
  if ($seen.ContainsKey($track.Location)) {
    $track.Location
    if ($Delete) {
      $track.Delete()
    }
  }
  else { 
    $seen.Set_Item($track.Location, $True)
  }
}