Collections | Scripting and security

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

# Almacenar en un array información sobre libros
$null = $arraylist.Add(
    [pscustomobject] @{
    titulo = "Redes Locales"
    isbn = "9788415426479"
    imagen = "https://images-na.ssl-images-amazon.com/images/I/51ggAPSyROL._SX383_BO1,204,203,200_.jpg"
    curso = "gi1"
    obligatorio = 1
    })

$null = $arraylist.Add(
    [pscustomobject] @{
    titulo = "Sistemas Operativos Monopuesto"
    isbn = "978-84-9771-9711"
    imagen = "https://images-na.ssl-images-amazon.com/images/I/51xaG8rZaSL._SX411_BO1,204,203,200_.jpg"
    curso = "gi1"
    obligatorio = 1
    })

$json = $arraylist | ConvertTo-Json

($json | ConvertFrom-Json).titulo

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

# Almacenar en un array información sobre libros

$null = $arraylist.Add(

[pscustomobject] @{

titulo = "Redes Locales"

isbn = "9788415426479"

imagen = "https://images-na.ssl-images-amazon.com/images/I/51ggAPSyROL._SX383_BO1,204,203,200_.jpg"

curso = "gi1"

obligatorio = 1

})

$null = $arraylist.Add(

[pscustomobject] @{

titulo = "Sistemas Operativos Monopuesto"

isbn = "978-84-9771-9711"

imagen = "https://images-na.ssl-images-amazon.com/images/I/51xaG8rZaSL._SX411_BO1,204,203,200_.jpg"

curso = "gi1"

obligatorio = 1

})

$json = $arraylist | ConvertTo-Json

($json | ConvertFrom-Json).titulo

PowerShell Strings

Comparar listas de arrays de caracteres

19/03/201803/03/2018

#Comparar con otro array y obtener los elementos que están en ambos arrays
#Array con valores
$Array=([System.Collections.Generic.HashSet[String]])::new([String[]]@("Carlos","Pedro","Lucas","Marcos","Mateo"))
$Array.IntersectWith([String[]]@("Pablo","Gonzalo","Marcos"))
$Array

#Obtener todos los elementos de los dos arrays sin repeticiones
#Array con valores
$Array=([System.Collections.Generic.HashSet[String]])::new([String[]]@("Carlos","Pedro","Lucas","Marcos","Mateo"))
$Array.UnionWith([String[]]@("Pablo","Gonzalo","Marcos"))
$Array

#Obtener los elementos de un array que no están en otro array
#Array con valores
$Array=([System.Collections.Generic.HashSet[String]])::new([String[]]@("Carlos","Pedro","Lucas","Marcos","Mateo"))
$Array.ExceptWith([String[]]@("Pablo","Gonzalo","Marcos"))
$Array

#Obtener todos los elementos de los dos arrays sin incluir los que están en los dos arrays
#Array con valores
$Array=([System.Collections.Generic.HashSet[String]])::new([String[]]@("Carlos","Pedro","Lucas","Marcos","Mateo"))
$Array.SymmetricExceptWith([String[]]@("Pablo","Gonzalo","Marcos"))
$Array

#Comparar con otro array y obtener los elementos que están en ambos arrays

#Array con valores

$Array=([System.Collections.Generic.HashSet[String]])::new([String[]]@("Carlos","Pedro","Lucas","Marcos","Mateo"))

$Array.IntersectWith([String[]]@("Pablo","Gonzalo","Marcos"))

$Array

#Obtener todos los elementos de los dos arrays sin repeticiones

#Array con valores

$Array=([System.Collections.Generic.HashSet[String]])::new([String[]]@("Carlos","Pedro","Lucas","Marcos","Mateo"))

$Array.UnionWith([String[]]@("Pablo","Gonzalo","Marcos"))

$Array

#Obtener los elementos de un array que no están en otro array

#Array con valores

$Array=([System.Collections.Generic.HashSet[String]])::new([String[]]@("Carlos","Pedro","Lucas","Marcos","Mateo"))

$Array.ExceptWith([String[]]@("Pablo","Gonzalo","Marcos"))

$Array

#Obtener todos los elementos de los dos arrays sin incluir los que están en los dos arrays

#Array con valores

$Array=([System.Collections.Generic.HashSet[String]])::new([String[]]@("Carlos","Pedro","Lucas","Marcos","Mateo"))

$Array.SymmetricExceptWith([String[]]@("Pablo","Gonzalo","Marcos"))

$Array

PowerShell

Obtener empresas del IBEX 35 en formato JSON

13/03/201804/03/2018

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

# Obtener empresas del IBEX 35
$web = Invoke-WebRequest 'http://www.bolsamadrid.es/esp/aspx/Mercados/Precios.aspx?indice=ESI100000000'
$result = $web.AllElements | Where Class -eq “DifFlBj” | %{$_.innerText}
$result += $web.AllElements | Where Class -eq “DifFlSb” | %{$_.innerText}
$result += $web.AllElements | Where Class -eq “DifFlIg” | %{$_.innerText}

# Almacenar en un array cada empresa del IBEX 35
ForEach ($elemento in $result){
    $null = $arraylist.Add(
    [pscustomobject] @{
    Empresa = $elemento
    Cotización = 0
    }
)
}

# Eliminar el primer elemento del array porque contiene una empresa no válida
$arraylist.Removeat(0)
# Número de empresas, tiene que ser 35
$arraylist.Count

# Convertir a JSON
$json = $arraylist | ConvertTo-Json

# Importar el contenido JSON y listar las empresas
($json | ConvertFrom-Json).empresa

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

# Obtener empresas del IBEX 35

$web = Invoke-WebRequest 'http://www.bolsamadrid.es/esp/aspx/Mercados/Precios.aspx?indice=ESI100000000'

$result = $web.AllElements | Where Class -eq “DifFlBj” | %{$_.innerText}

$result += $web.AllElements | Where Class -eq “DifFlSb” | %{$_.innerText}

$result += $web.AllElements | Where Class -eq “DifFlIg” | %{$_.innerText}

# Almacenar en un array cada empresa del IBEX 35

ForEach ($elemento in $result){

$null = $arraylist.Add(

[pscustomobject] @{

Empresa = $elemento

Cotización = 0

}

)

}

# Eliminar el primer elemento del array porque contiene una empresa no válida

$arraylist.Removeat(0)

# Número de empresas, tiene que ser 35

$arraylist.Count

# Convertir a JSON

$json = $arraylist | ConvertTo-Json

# Importar el contenido JSON y listar las empresas

($json | ConvertFrom-Json).empresa

PowerShell

Analizar fichero XML con la lista de radares de España

17/02/201818/02/2018

$radares = [XML](Invoke-WebRequest "http://www.dgt.es/images/Tramos_INVIVE_12042017.xml").content

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

$radares.RAIZ.PROVINCIA.CARRETERA | %{
    $radar = $_.DENOMINACION + "|" + $_.RADAR.PUNTO_INICIAL.PK
    [void]$arraylist.Add($radar)
}

$arraylist | Sort-Object

$radares = [XML](Invoke-WebRequest "http://www.dgt.es/images/Tramos_INVIVE_12042017.xml").content

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

$radares.RAIZ.PROVINCIA.CARRETERA | %{

$radar = $_.DENOMINACION + "|" + $_.RADAR.PUNTO_INICIAL.PK

[void]$arraylist.Add($radar)

}

$arraylist | Sort-Object

Automation PowerShell

Detectar si el ratón pasa por alguna posición de la pantalla

06/02/201803/01/2018

#Inicializa una nueva instancia de la clase ArrayList que está vacía y tiene la capacidad inicial predeterminada
[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

#Añadir posiciones 
[void]$arraylist.Add('0,0')


for (1)
{
    $dY = ([System.Windows.Forms.Cursor]::Position.Y)
    $dX = ([System.Windows.Forms.Cursor]::Position.X)
    if($arraylist.IndexOf("$dX,$dY") -ne -1)
    {
        "El ratón ha pasado por la posición $dX,$dY"
    }
    else
    {
        ""
    }
}

#Inicializa una nueva instancia de la clase ArrayList que está vacía y tiene la capacidad inicial predeterminada

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

#Añadir posiciones

[void]$arraylist.Add('0,0')

for (1)

{

$dY = ([System.Windows.Forms.Cursor]::Position.Y)

$dX = ([System.Windows.Forms.Cursor]::Position.X)

if($arraylist.IndexOf("$dX,$dY") -ne -1)

{

"El ratón ha pasado por la posición $dX,$dY"

}

else

{

}

PowerShell

Comparar listas de arrays de números

03/02/201829/12/2017

#Comparar con otro array y obtener los elementos que están en ambos arrays
#Array con valores
$Array=([System.Collections.Generic.HashSet[int32]])::new([int[]]@(1,2,3,4,5,6))
$Array.IntersectWith([int[]]@(5,6,7,8,9,10))
$Array

#Obtener todos los elementos de los dos arrays sin repeticiones
#Array con valores
$Array=([System.Collections.Generic.HashSet[int32]])::new([int[]]@(1,2,3,4,5,6))
$Array.UnionWith([int[]]@(5,6,7,8,9,10))
$Array

#Obtener los elementos de un array que no están en otro array
#Array con valores
$Array=([System.Collections.Generic.HashSet[int32]])::new([int[]]@(1,2,3,4,5,6))
$Array.ExceptWith([int[]]@(5,6,7,8,9,10))
$Array

#Obtener todos los elementos de los dos arrays sin incluir los que están en los dos arrays
#Array con valores
$Array=([System.Collections.Generic.HashSet[int32]])::new([int[]]@(1,2,3,4,5,6))
$Array.SymmetricExceptWith([int[]]@(5,6,7,8,9,10))
$Array

#Comparar con otro array y obtener los elementos que están en ambos arrays

#Array con valores

$Array=([System.Collections.Generic.HashSet[int32]])::new([int[]]@(1,2,3,4,5,6))

$Array.IntersectWith([int[]]@(5,6,7,8,9,10))

$Array

#Obtener todos los elementos de los dos arrays sin repeticiones

#Array con valores

$Array=([System.Collections.Generic.HashSet[int32]])::new([int[]]@(1,2,3,4,5,6))

$Array.UnionWith([int[]]@(5,6,7,8,9,10))

$Array

#Obtener los elementos de un array que no están en otro array

#Array con valores

$Array=([System.Collections.Generic.HashSet[int32]])::new([int[]]@(1,2,3,4,5,6))

$Array.ExceptWith([int[]]@(5,6,7,8,9,10))

$Array

#Obtener todos los elementos de los dos arrays sin incluir los que están en los dos arrays

#Array con valores

$Array=([System.Collections.Generic.HashSet[int32]])::new([int[]]@(1,2,3,4,5,6))

$Array.SymmetricExceptWith([int[]]@(5,6,7,8,9,10))

$Array

PowerShell

Ejercicios de PowerShell: analizar la frecuencia de letras en un fichero

15/01/201830/03/2018

Versión 1

#Abrir el fichero texto.txt y añadir cada una de las letras que contiene el fichero en una ArrayList

#Inicializa una nueva instancia de la clase ArrayList que está vacía y tiene la capacidad inicial predeterminada
[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList
 
ForEach ($elemento in gc .\texto.txt){
#Agrega un objeto al final de ArrayList
0..($elemento.Length-1) | %{
[void]$arraylist.Add($elemento[$_])
}
}

$arraylist | Group-Object | Sort-Object Count -Descending | select Name,Count

#Abrir el fichero texto.txt y añadir cada una de las letras que contiene el fichero en una ArrayList

#Inicializa una nueva instancia de la clase ArrayList que está vacía y tiene la capacidad inicial predeterminada

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

ForEach ($elemento in gc .\texto.txt){

#Agrega un objeto al final de ArrayList

0..($elemento.Length-1) | %{

[void]$arraylist.Add($elemento[$_])

}

$arraylist | Group-Object | Sort-Object Count -Descending | select Name,Count

Versión 2

(((Get-Content .\texto.txt) -join "`r").ToUpper().GetEnumerator()) | Group-Object | Sort-Object Count -Descending | select Name,Count

1	(((Get-Content .\texto.txt) -join "`r").ToUpper().GetEnumerator()) \| Group-Object \| Sort-Object Count -Descending \| select Name,Count

PowerShell

Determinar si Hashtable contiene una clave específica

13/01/201813/01/2018

#Agrega elementos a la clase HashTable
#https://msdn.microsoft.com/es-es/library/system.collections.hashtable(v=vs.110).aspx
$hashtable = @{uno='valoruno'; dos='valordos'; tres='valortres'}

#HashTable sin ordenar
$hashtable

#Detectar si existe un elemento en la clase HashTable
$hashtable.Contains("uno")
$hashtable.Contains("uno1")

#Agrega elementos a la clase HashTable

#https://msdn.microsoft.com/es-es/library/system.collections.hashtable(v=vs.110).aspx

$hashtable = @{uno='valoruno'; dos='valordos'; tres='valortres'}

#HashTable sin ordenar

$hashtable

#Detectar si existe un elemento en la clase HashTable

$hashtable.Contains("uno")

$hashtable.Contains("uno1")

Older Posts