Реєстраційний номер облікової картки платника податків

rnokpp.php

#!/usr/bin/env php
<?php
$code = $argv[1] ?? '1010101017';

if (!is_string($code) || strlen($code) != 10 || !is_numeric($code)) {
    echo 'РНОКПП має бути довжиною 10 цифр' . PHP_EOL;
    die();
}

echo 'Що відомо про РНОКПП ' . $code . PHP_EOL;

$sex = (int) $code[8] % 2 ? 'чоловіча' : 'жіноча';
echo 'Стать: ' . $sex . PHP_EOL;

$days = 'P' . substr($code, 0, 5) . 'D';
$dob = (new \DateTime('1899-12-31'))->add(new \DateInterval($days));
echo 'Дата народження: ' . $dob->format('Y-m-d') . PHP_EOL;

$magic = fn($i) => [-1, 5, 7, 9, 4, 6, 10, 5, 7][$i] * (int) $code[$i];
$control_digit = array_sum(array_map($magic, range(0, 8))) % 11 % 10;
$is_valid = (int) $code[9] === $control_digit;
if ($is_valid) {
    echo 'Контрольна сума збігається' . PHP_EOL;
} else {
    echo 'Контрольна сума не збігається' . PHP_EOL;
    echo 'Остання цифра має бути ' . $control_digit . PHP_EOL;
}