Powershell : extraction des adresses du champ « To » d’une entête SMTP

J’ai développé en Powershell un script permettant d’extraire les adresses mail d’une en-tête SMTP. Mon but était de récupérer dans un fichier CSV une liste d’adresses pour effectuer sur ces adresses un traitement supplémentaire.

Dans Outlook, il suffit donc d’ouvrir l’entête SMTP du mail en question, de copier-coller le champ « To » dans un fichier texte et de le passer en paramètre lors de l’exécution du script pour obtenir la liste des adresses dans l’output console Powershell ainsi que dans le fichier CSV passé en paramètre. On peut donc l’appeler ainsi :

.\regex-to-smtp-header.ps1 -Header to.txt -CsvOutput addresses.csv

Voici le script, la version commentée est disponible après celui-ci.

param([Parameter(Mandatory=$true)][string]$Header, [Parameter(Mandatory=$true)][string]$CsvOutput)
$CsvExport = @()
$smtpheader = Get-Content -Path $Header -Raw -ErrorAction stop
while($smtpheader.IndexOf("<") -ne -1) {
    $ls = $smtpheader.IndexOf("<")
    $rs = $smtpheader.IndexOf(">")
    $adrlgt = $rs-$ls
    $adr = $smtpheader.SubString(($ls+1),($adrlgt-1))
    echo $adr
    $adrcsv=@{Address=$adr}
    $adrexp = New-Object PSObject -Property $adrcsv
    $CsvExport+=$adrexp
    $smtpheader = $smtpheader.Substring($rs+1,(($smtpheader.Length-$rs)-1))
}
$CsvExport | Export-CSV $CsvOutput -NoTypeInformation