Tunninäide: 7.02.2012, Powershell

<#
.SYNOPSIS
 Kolm kõige suuremat faili, kõigilt ketastelt
.DESCRIPTION
  Veel ei ole
.Example
  C:\PS>.\Anna-Suured.ps1 
.NOTES
  Autor: Heiki Tähis
  Versioon: 0.1
  Muutmise kuup2ev 7.02.2012
.LINK
  http://wiki.itcollege.ee
#>
param([int]$Mitu = 3,
      [switch]$AinultCKettalt)
function Anna-KettaTahed
{
    $kettad = Get-PSDrive -PSProvider FileSystem 
    foreach($ketas in $kettad)
    {
        if($ketas.Used -gt 0)
        {
            $ketas.Root
        }
    }
}
function Anna-KettaTahed2
{
    param([switch]$Suurusega)
    $kettad = Get-PSDrive -PSProvider FileSystem 
    If($Suurusega)
    {
        $kettad = $kettad | where {$_.Used -gt 0}
    }
    $kettad | Select-Object -ExpandProperty Root 
}
if($AinultCKettalt)
{
    $drvs = "C:\"
}
else
{
    $drvs = Anna-KettaTahed2 -Suurusega
}
Get-ChildItem $drvs -Recurse | sort Length -Descending | select -First $Mitu