YAPC::EU 2018 Glasgow Update!
This commit is contained in:
Ingy döt Net
parent
22f33d4004
commit
4e2d22a71d
1170 changed files with 15042 additions and 3047 deletions
|
|
@ -1,60 +1,26 @@
|
|||
@'
|
||||
"Country","Length","Example"
|
||||
"Albania",28,"AL47212110090000000235698741"
|
||||
"Andorra",24,"AD1200012030200359100100"
|
||||
"Austria",20,"AT611904300235473201"
|
||||
"Belgium",16,"BE68539007547034"
|
||||
"Bosnia and Herzegovina",20,"BA391290079401028494"
|
||||
"Bulgaria",22,"BG80BNBG96611020345678"
|
||||
"Croatia",21,"HR1210010051863000160"
|
||||
"Cyprus",28,"CY17002001280000001200527600"
|
||||
"Czech Republic",24,"CZ6508000000192000145399"
|
||||
"Denmark",18,"DK5000400440116243"
|
||||
"Estonia",20,"EE382200221020145685"
|
||||
"Faroe Islands",18,"FO1464600009692713"
|
||||
"Finland",18,"FI2112345600000785"
|
||||
"France",27,"FR1420041010050500013M02606"
|
||||
"Georgia",22,"GE29NB0000000101904917"
|
||||
"Germany",22,"DE89370400440532013000"
|
||||
"Gibraltar",23,"GI75NWBK000000007099453"
|
||||
"Greece",27,"GR1601101250000000012300695"
|
||||
"Greenland",18,"GL8964710001000206"
|
||||
"Hungary",28,"HU42117730161111101800000000"
|
||||
"Iceland",26,"IS140159260076545510730339"
|
||||
"Ireland",22,"IE29AIBK93115212345678"
|
||||
"Italy",27,"IT60X0542811101000000123456"
|
||||
"Kosovo",20,"XK051212012345678906"
|
||||
"Latvia",21,"LV80BANK0000435195001"
|
||||
"Liechtenstein",21,"LI21088100002324013AA"
|
||||
"Lithuania",20,"LT121000011101001000"
|
||||
"Luxembourg",20,"LU280019400644750000"
|
||||
"Macedonia",19,"MK07300000000042425"
|
||||
"Malta",31,"MT84MALT011000012345MTLCAST001S"
|
||||
"Moldova",24,"MD24AG000225100013104168"
|
||||
"Monaco",27,"MC5813488000010051108001292"
|
||||
"Montenegro",22,"ME25505000012345678951"
|
||||
"Netherlands",18,"NL91ABNA0417164300"
|
||||
"Norway",15,"NO9386011117947"
|
||||
"Poland",28,"PL27114020040000300201355387"
|
||||
"Portugal",25,"PT50000201231234567890154"
|
||||
"Romania",24,"RO49AAAA1B31007593840000"
|
||||
"San Marino",27,"SM86U0322509800000000270100"
|
||||
"Serbia",22,"RS35260005601001611379"
|
||||
"Slovakia",24,"SK3112000000198742637541"
|
||||
"Slovenia",19,"SI56191000000123438"
|
||||
"Spain",24,"ES9121000418450200051332"
|
||||
"Sweden",24,"SE3550000000054910000003"
|
||||
"Switzerland",21,"CH9300762011623852957"
|
||||
"Ukraine",29,"UA573543470006762462054925026"
|
||||
"United Kingdom",22,"GB29NWBK60161331926819"
|
||||
'@ -split "`r`n" | Set-Content -Path .\IBAN.csv -Force
|
||||
|
||||
$ibans = foreach ($iban in Import-Csv -Path .\IBAN.csv)
|
||||
function verifIBAN ([string]$ibanS)
|
||||
{
|
||||
$iban | Select-Object -Property Country,
|
||||
@{Name='Code' ; Expression={$iban.Example.Substring(0,2)}},
|
||||
@{Name='Length'; Expression={[int]$iban.Length}},
|
||||
Example
|
||||
if ($ibanS.Length -ne 27) {return $false} else
|
||||
{
|
||||
$ibanI="$($ibanS.Substring(4,23))$($ibanS.Substring(0,4))".ToUpper()
|
||||
[int]$comptIBAN=0
|
||||
$NumIBAN=""
|
||||
while ($comptIBAN -lt 27)
|
||||
{
|
||||
if ([byte]$ibanI[$comptIBAN] -ge 65 -and [byte]$ibanI[$comptIBAN] -le 90)
|
||||
{
|
||||
$NumIban+=([byte]$ibanI[$comptIBAN]-55)
|
||||
} #pour transformer les lettres en chiffres (A=10, B=11...)
|
||||
else
|
||||
{
|
||||
$NumIban+=$ibanI[$comptIBAN]
|
||||
}
|
||||
$comptIBAN++
|
||||
}
|
||||
#cela fait un nombre de 30 chiffres : trop pour powershell, je découpe donc les 9 premiers caractères :
|
||||
if ("$($NumIBAN.Substring(0,9)%97)$($NumIBAN.Substring(9,$NumIBAN.Length-9))"%97 -eq 1)
|
||||
{return $true}
|
||||
else
|
||||
{return $false}
|
||||
}
|
||||
|
||||
$ibans
|
||||
} #fin fonction vérification IBAN / Stéphane RABANY 2018
|
||||
|
|
|
|||
|
|
@ -1,10 +1,60 @@
|
|||
$regex = [regex]'[a-zA-Z]{2}[0-9]{2}[a-zA-Z0-9]{6}[0-9]{5}([a-zA-Z0-9]?){0,16}'
|
||||
@'
|
||||
"Country","Length","Example"
|
||||
"Albania",28,"AL47212110090000000235698741"
|
||||
"Andorra",24,"AD1200012030200359100100"
|
||||
"Austria",20,"AT611904300235473201"
|
||||
"Belgium",16,"BE68539007547034"
|
||||
"Bosnia and Herzegovina",20,"BA391290079401028494"
|
||||
"Bulgaria",22,"BG80BNBG96611020345678"
|
||||
"Croatia",21,"HR1210010051863000160"
|
||||
"Cyprus",28,"CY17002001280000001200527600"
|
||||
"Czech Republic",24,"CZ6508000000192000145399"
|
||||
"Denmark",18,"DK5000400440116243"
|
||||
"Estonia",20,"EE382200221020145685"
|
||||
"Faroe Islands",18,"FO1464600009692713"
|
||||
"Finland",18,"FI2112345600000785"
|
||||
"France",27,"FR1420041010050500013M02606"
|
||||
"Georgia",22,"GE29NB0000000101904917"
|
||||
"Germany",22,"DE89370400440532013000"
|
||||
"Gibraltar",23,"GI75NWBK000000007099453"
|
||||
"Greece",27,"GR1601101250000000012300695"
|
||||
"Greenland",18,"GL8964710001000206"
|
||||
"Hungary",28,"HU42117730161111101800000000"
|
||||
"Iceland",26,"IS140159260076545510730339"
|
||||
"Ireland",22,"IE29AIBK93115212345678"
|
||||
"Italy",27,"IT60X0542811101000000123456"
|
||||
"Kosovo",20,"XK051212012345678906"
|
||||
"Latvia",21,"LV80BANK0000435195001"
|
||||
"Liechtenstein",21,"LI21088100002324013AA"
|
||||
"Lithuania",20,"LT121000011101001000"
|
||||
"Luxembourg",20,"LU280019400644750000"
|
||||
"Macedonia",19,"MK07300000000042425"
|
||||
"Malta",31,"MT84MALT011000012345MTLCAST001S"
|
||||
"Moldova",24,"MD24AG000225100013104168"
|
||||
"Monaco",27,"MC5813488000010051108001292"
|
||||
"Montenegro",22,"ME25505000012345678951"
|
||||
"Netherlands",18,"NL91ABNA0417164300"
|
||||
"Norway",15,"NO9386011117947"
|
||||
"Poland",28,"PL27114020040000300201355387"
|
||||
"Portugal",25,"PT50000201231234567890154"
|
||||
"Romania",24,"RO49AAAA1B31007593840000"
|
||||
"San Marino",27,"SM86U0322509800000000270100"
|
||||
"Serbia",22,"RS35260005601001611379"
|
||||
"Slovakia",24,"SK3112000000198742637541"
|
||||
"Slovenia",19,"SI56191000000123438"
|
||||
"Spain",24,"ES9121000418450200051332"
|
||||
"Sweden",24,"SE3550000000054910000003"
|
||||
"Switzerland",21,"CH9300762011623852957"
|
||||
"Ukraine",29,"UA573543470006762462054925026"
|
||||
"United Kingdom",22,"GB29NWBK60161331926819"
|
||||
'@ -split "`r`n" | Set-Content -Path .\IBAN.csv -Force
|
||||
|
||||
foreach ($iban in $ibans)
|
||||
$ibans = foreach ($iban in Import-Csv -Path .\IBAN.csv)
|
||||
{
|
||||
[PSCustomObject]@{
|
||||
Country = $iban.Country
|
||||
Example = $iban.Example
|
||||
IsValid = $regex.IsMatch($iban.Example)
|
||||
}
|
||||
$iban | Select-Object -Property Country,
|
||||
@{Name='Code' ; Expression={$iban.Example.Substring(0,2)}},
|
||||
@{Name='Length'; Expression={[int]$iban.Length}},
|
||||
Example
|
||||
}
|
||||
|
||||
$ibans
|
||||
|
|
|
|||
10
Task/IBAN/PowerShell/iban-3.psh
Normal file
10
Task/IBAN/PowerShell/iban-3.psh
Normal file
|
|
@ -0,0 +1,10 @@
|
|||
$regex = [regex]'[a-zA-Z]{2}[0-9]{2}[a-zA-Z0-9]{6}[0-9]{5}([a-zA-Z0-9]?){0,16}'
|
||||
|
||||
foreach ($iban in $ibans)
|
||||
{
|
||||
[PSCustomObject]@{
|
||||
Country = $iban.Country
|
||||
Example = $iban.Example
|
||||
IsValid = $regex.IsMatch($iban.Example)
|
||||
}
|
||||
}
|
||||
Loading…
Add table
Add a link
Reference in a new issue