use warnings;
use strict;
use feature 'say';

use constant STEPPER_SEQUENCE => [
        [qw(1 0 0 1)],
        [qw(1 0 0 0)],
        [qw(1 1 0 0)],
        [qw(0 1 0 0)],
        [qw(0 1 1 0)],
        [qw(0 0 1 0)],
        [qw(0 0 1 1)],
        [qw(0 0 0 1)],
    ];

use constant STEP_COUNT => STEPPER_SEQUENCE->@*;

say STEP_COUNT;

##</code><code>##

ARRAY(0x17985b8)ARRAY(0x17981f8)ARRAY(0x17c8e68)ARRAY(0x17edc90)ARRAY(0x17edd80)ARRAY(0x17a7708)ARRAY(0x17ee0c8)ARRAY(0x1805590)