listar ram

Un script que tengo en producción, lo publico "como es", ya que no contiene ningun dato confidencial.
los comentarios, en negrita y cursiva
No es tan complicado como parece a primera vista, cuando una linea termina en "|" es porque contiua la linea abajo, pero el blog no tiene tanto ancho ;)

# Nombre de script: ListarRam.ps1
# Version: 0.1
# lenguaje: powershell
# requerimientos: powershell 1.0 instalado en el pc donde
# se ejecutará el script.
# autor: Jorge Mestre
# Fecha: 20/11/06
#
# descripcion: lista pc, cantidad de ram, tipo, posicion
# en slots y velocidad en un csv
# Modificar var $lista.
# ejecutar script redirigiendo a un archivo.

#obtiene la lista de los pcs
$lista = get-content c:\RamHD\listapcs.txt

#crea cabecera csv
"PC;capacidad;ubicacion;tipo de memoria; |
posicion;velocidad;etiqueta"

# para cada pc...
foreach($pc in $lista){
#obtiene la información sobre la memoria fisica.
$colPc = get-wmiObject Win32_PhysicalMemory |
-comp $pc

# para cada componente obtenido de la memoria fisica...
foreach($comp in $colPc){
# si la memoria no es Flash...
if ($comp.MemoryType -ne 11){
write-output "$pc;$(($comp.Capacity/1024)/1024); |
$($comp.DeviceLocator);$($comp.MemoryType); |
$($comp.PositionInRow);$($comp.Speed); |
$($comp.Tag)" # escribir en formato csv
}
}
}

#relacion de tipo de memoria.
#Value Meaning
#0 Unknown
#1 Other
#2 DRAM
#3 Synchronous DRAM
#4 Cache DRAM
#5 EDO
#6 EDRAM
#7 VRAM
#8 SRAM
#9 RAM
#10 ROM
#11 Flash
#12 EEPROM
#13 FEPROM
#14 EPROM
#15 CDRAM
#16 3DRAM
#17 SDRAM
#18 SGRAM
#19 RDRAM
#20 DDR