Remove All Previous Snapshot then generate new ones in Digital Ocean

snapshotall.ps1

$sw = [Diagnostics.Stopwatch]::StartNew()

# Drop all existing snapshot
$snapshots = doctl compute snapshot list --format ID --no-header
foreach ($line in $snapshots) {
    doctl compute snapshot delete $line -f
}
# List all droplets and create snapshot
$droplets = doctl compute droplet list --format ID,Name --no-header
foreach($line in $droplets) {
    $id, $name = $line -split '\s+'
    $date = (Get-Date).ToString("yyyy-MM-dd")
    doctl compute droplet-action snapshot --snapshot-name "$name-$date" $id
}

$volumes = doctl compute volume list --format ID,Name --no-header
foreach($line in $volumes) {
    $id, $name = $line -split '\s+'
    $date = (Get-Date).ToString("yyyy-MM-dd")
    doctl compute volume snapshot --snapshot-name "$name-$date" $id
}

$sw.Stop()
write-host "done in" $sw.Elapsed