Help for this page
>perl -wMstrict -le "use constant LEN => 5; ... " '1234598765555553456733333' '1234798767xxxxx3456933335'