Dumping ILO (and Other DHCP Addresses)

Here's a quick-n-dirty script that dumps ILO address from the DHCP server.

function Get-Ilo {

param ( [string]$computer = $env:COMPUTERNAME );

$scope = (netsh.exe dhcp server \\$computer show scope | Select-String 'ilo') -replace "\s+-.*" -replace "\s";
netsh.exe dhcp server \\$computer scope $scope show clients 1 | Select-String "^\d" | % {
$data = ($_ -replace "\s+-\s+","," -replace "\s+-","," -replace "-\s+",",").Split(",");
$true | Select-Object @{
n = 'IpAddr';
e = { $data[0]; }
}, @{
    n = 'Subnet';
e = { $data[1]; }
}, @{
    n = 'MacAddr';
e = { $data[2]; }
}, @{
    n = 'LeaseExpires';
e = { $data[3]; }
}, @{
    n = 'Type';
e = { $data[4]; }
}, @{
    n = 'Name';
e = { $data[5]; }
}
    }
}