1use Test::More;
2use strict; use warnings FATAL => 'all';
3
4use List::Objects::WithUtils 'array';
5
6ok !defined array->get(1), 'empty array get ok';
7
8my $arr = array(1 .. 3);
9cmp_ok $arr->get(0), '==', 1, 'get 0 ok';
10cmp_ok $arr->get(1), '==', 2, 'get 1 ok';
11cmp_ok $arr->get(2), '==', 3, 'get 2 ok';
12ok !defined $arr->get(3), 'get 3 undef ok';
13
14done_testing;
15