use Test::More tests => 4;
BEGIN { use_ok('PerlX::ArraySkip', 'askip') };
is_deeply(
        [ askip 0 .. 10 ],
        [ 1 .. 10 ],
);
is_deeply(
        [ 1, askip 2, 3, askip 4, 5, askip 6, 7, askip 8 ],
        [ 1, 3, 5, 7 ],
);
is_deeply(
        [ askip ],
        [ ],
);