2022/02/12 #りそなデビットカードの利用代金

皆様おはようございます、

#猫でもできるPowerShell(備忘録)

#りそなデビットカードの利用代金
<#
りそなデビットカードご利用およびご利用代金引落しのご連絡
#>
$Str1= @"
[
ご利用日時:2022/01/10 14:08:17
ご利用金額:362円
承認番号:******
ご利用加盟店名(※):MYBASKET ******
,
ご利用日時:2022/01/10 20:59:45
ご利用金額:382円
承認番号:******
ご利用加盟店名(※):AEON ******
,
ご利用日時:2022/01/11 07:56:58
ご利用金額:273円
承認番号:******
ご利用加盟店名(※):FAMILYMART
,
ご利用日時:2022/01/11 12:34:07
ご利用金額:530円
承認番号:******
ご利用加盟店名(※):FAMILYMART
,
ご利用日時:2022/01/11 21:09:22
ご利用金額:582円
承認番号:******
ご利用加盟店名(※):AEON ******
,
]
"@

<#ラベル表記#>$Str2 = @"
ご利用日時:
ご利用金額:
承認番号:
ご利用加盟店名(※):
"@  
#ラベル表記のお尻が空白になるとOGVで表示されないので、あとで要変換
$s = $Str2.replace("`r","").split("`n")

#ややこしい改行・文言を消して行く
$Str1 = $Str1.Replace("`r`n`r`n`r`n","`r`n")
$Str1 = $Str1.Replace("`r`n`r`n","`r`n")

#ここから表示記号の置換
$s |%{$Str1 = $Str1.Replace($_, "`",`""+$_+"`":`"")} #ラベル項目の後ろにコロンを付与
$Str1 = $Str1 -Replace "\s*:", ":"  #ラベル項目部分のお尻の空白を除去 #ここはメソッドにしてない
$Str1 = $Str1.Replace("`r`n`"`,`"", "`"`,`r`n`"") #先頭が変な ", で始まる(データ部が改行で終わる)のを修正
$Str1 = $Str1.Replace("`"`r`n", "`"") #終端が変な " で終わる(データ部が改行で始まる)のを修正
$Str1 = $Str1.Replace("`r`n`,`"`,`r`n",   "`"}`,`r`n{") #各エントリ部分の最後に出た ,", を },{ に置き換える
$Str1 = $Str1.Replace("[`"`,`r`n", "[`r`n{") #JSON先頭部分に出た [", を [{ に置き換える
$Str1 = $Str1.Replace("`r`n`,`r`n]", "`"}`r`n]")  #JSON後尾部分に出た ,] を "}] に置き換える

$Str1 |ConvertFrom-Json |tee -v Obj
$Obj  |
OGV

f:id:TPTPTb:20220213020112p:plain

私生活で りそなデビットカード を使った際に送られてくる利用代金の通知メールから抜粋して JSON→グリッド形式に変換させてみました。
ラベル名表記を把握すると割合すんなりできるようになります
しかしFAMILYMARTで使えるようになったのは大きいですね・・
ではまた;